drivers/s390/net/qeth_core_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/compat.h>
  14 #include <linux/module.h>
  15 #include <linux/moduleparam.h>
  16 #include <linux/string.h>
  17 #include <linux/errno.h>
  18 #include <linux/kernel.h>
  19 #include <linux/log2.h>
  20 #include <linux/ip.h>
  21 #include <linux/tcp.h>
  22 #include <linux/mii.h>
  23 #include <linux/kthread.h>
  24 #include <linux/slab.h>
  25 #include <linux/if_vlan.h>
  26 #include <linux/netdevice.h>
  27 #include <linux/netdev_features.h>
  28 #include <linux/skbuff.h>
  29 #include <linux/vmalloc.h>
  30
  31 #include <net/iucv/af_iucv.h>
  32 #include <net/dsfield.h>
  33
  34 #include <asm/ebcdic.h>
  35 #include <asm/chpid.h>
  36 #include <asm/io.h>
  37 #include <asm/sysinfo.h>
  38 #include <asm/diag.h>
  39 #include <asm/cio.h>
  40 #include <asm/ccwdev.h>
  41 #include <asm/cpcmd.h>
  42
  43 #include "qeth_core.h"
  44
  45 struct qeth_dbf_info qeth_dbf[QETH_DBF_INFOS] = {
  46         /* define dbf - Name, Pages, Areas, Maxlen, Level, View, Handle */
  47         /*                   N  P  A    M  L  V                      H  */
  48         [QETH_DBF_SETUP] = {"qeth_setup",
  49                                 8, 1,   8, 5, &debug_hex_ascii_view, NULL},
  50         [QETH_DBF_MSG]   = {"qeth_msg", 8, 1, 11 * sizeof(long), 3,
  51                             &debug_sprintf_view, NULL},
  52         [QETH_DBF_CTRL]  = {"qeth_control",
  53                 8, 1, QETH_DBF_CTRL_LEN, 5, &debug_hex_ascii_view, NULL},
  54 };
  55 EXPORT_SYMBOL_GPL(qeth_dbf);
  56
  57 struct kmem_cache *qeth_core_header_cache;
  58 EXPORT_SYMBOL_GPL(qeth_core_header_cache);
  59 static struct kmem_cache *qeth_qdio_outbuf_cache;
  60
  61 static struct device *qeth_core_root_dev;
  62 static struct lock_class_key qdio_out_skb_queue_key;
  63
  64 static void qeth_send_control_data_cb(struct qeth_card *card,
  65                                       struct qeth_channel *channel,
  66                                       struct qeth_cmd_buffer *iob);
  67 static struct qeth_cmd_buffer *qeth_get_buffer(struct qeth_channel *);
  68 static void qeth_free_buffer_pool(struct qeth_card *);
  69 static int qeth_qdio_establish(struct qeth_card *);
  70 static void qeth_free_qdio_buffers(struct qeth_card *);
  71 static void qeth_notify_skbs(struct qeth_qdio_out_q *queue,
  72                 struct qeth_qdio_out_buffer *buf,
  73                 enum iucv_tx_notify notification);
  74 static void qeth_release_skbs(struct qeth_qdio_out_buffer *buf);
  75 static int qeth_init_qdio_out_buf(struct qeth_qdio_out_q *, int);
  76
  77 static struct workqueue_struct *qeth_wq;
  78
  79 int qeth_card_hw_is_reachable(struct qeth_card *card)
  80 {
  81         return (card->state == CARD_STATE_SOFTSETUP) ||
  82                 (card->state == CARD_STATE_UP);
  83 }
  84 EXPORT_SYMBOL_GPL(qeth_card_hw_is_reachable);
  85
  86 static void qeth_close_dev_handler(struct work_struct *work)
  87 {
  88         struct qeth_card *card;
  89
  90         card = container_of(work, struct qeth_card, close_dev_work);
  91         QETH_CARD_TEXT(card, 2, "cldevhdl");
  92         rtnl_lock();
  93         dev_close(card->dev);
  94         rtnl_unlock();
  95         ccwgroup_set_offline(card->gdev);
  96 }
  97
  98 void qeth_close_dev(struct qeth_card *card)
  99 {
 100         QETH_CARD_TEXT(card, 2, "cldevsubm");
 101         queue_work(qeth_wq, &card->close_dev_work);
 102 }
 103 EXPORT_SYMBOL_GPL(qeth_close_dev);
 104
 105 static const char *qeth_get_cardname(struct qeth_card *card)
 106 {
 107         if (card->info.guestlan) {
 108                 switch (card->info.type) {
 109                 case QETH_CARD_TYPE_OSD:
 110                         return " Virtual NIC QDIO";
 111                 case QETH_CARD_TYPE_IQD:
 112                         return " Virtual NIC Hiper";
 113                 case QETH_CARD_TYPE_OSM:
 114                         return " Virtual NIC QDIO - OSM";
 115                 case QETH_CARD_TYPE_OSX:
 116                         return " Virtual NIC QDIO - OSX";
 117                 default:
 118                         return " unknown";
 119                 }
 120         } else {
 121                 switch (card->info.type) {
 122                 case QETH_CARD_TYPE_OSD:
 123                         return " OSD Express";
 124                 case QETH_CARD_TYPE_IQD:
 125                         return " HiperSockets";
 126                 case QETH_CARD_TYPE_OSN:
 127                         return " OSN QDIO";
 128                 case QETH_CARD_TYPE_OSM:
 129                         return " OSM QDIO";
 130                 case QETH_CARD_TYPE_OSX:
 131                         return " OSX QDIO";
 132                 default:
 133                         return " unknown";
 134                 }
 135         }
 136         return " n/a";
 137 }
 138
 139 /* max length to be returned: 14 */
 140 const char *qeth_get_cardname_short(struct qeth_card *card)
 141 {
 142         if (card->info.guestlan) {
 143                 switch (card->info.type) {
 144                 case QETH_CARD_TYPE_OSD:
 145                         return "Virt.NIC QDIO";
 146                 case QETH_CARD_TYPE_IQD:
 147                         return "Virt.NIC Hiper";
 148                 case QETH_CARD_TYPE_OSM:
 149                         return "Virt.NIC OSM";
 150                 case QETH_CARD_TYPE_OSX:
 151                         return "Virt.NIC OSX";
 152                 default:
 153                         return "unknown";
 154                 }
 155         } else {
 156                 switch (card->info.type) {
 157                 case QETH_CARD_TYPE_OSD:
 158                         switch (card->info.link_type) {
 159                         case QETH_LINK_TYPE_FAST_ETH:
 160                                 return "OSD_100";
 161                         case QETH_LINK_TYPE_HSTR:
 162                                 return "HSTR";
 163                         case QETH_LINK_TYPE_GBIT_ETH:
 164                                 return "OSD_1000";
 165                         case QETH_LINK_TYPE_10GBIT_ETH:
 166                                 return "OSD_10GIG";
 167                         case QETH_LINK_TYPE_25GBIT_ETH:
 168                                 return "OSD_25GIG";
 169                         case QETH_LINK_TYPE_LANE_ETH100:
 170                                 return "OSD_FE_LANE";
 171                         case QETH_LINK_TYPE_LANE_TR:
 172                                 return "OSD_TR_LANE";
 173                         case QETH_LINK_TYPE_LANE_ETH1000:
 174                                 return "OSD_GbE_LANE";
 175                         case QETH_LINK_TYPE_LANE:
 176                                 return "OSD_ATM_LANE";
 177                         default:
 178                                 return "OSD_Express";
 179                         }
 180                 case QETH_CARD_TYPE_IQD:
 181                         return "HiperSockets";
 182                 case QETH_CARD_TYPE_OSN:
 183                         return "OSN";
 184                 case QETH_CARD_TYPE_OSM:
 185                         return "OSM_1000";
 186                 case QETH_CARD_TYPE_OSX:
 187                         return "OSX_10GIG";
 188                 default:
 189                         return "unknown";
 190                 }
 191         }
 192         return "n/a";
 193 }
 194
 195 void qeth_set_allowed_threads(struct qeth_card *card, unsigned long threads,
 196                          int clear_start_mask)
 197 {
 198         unsigned long flags;
 199
 200         spin_lock_irqsave(&card->thread_mask_lock, flags);
 201         card->thread_allowed_mask = threads;
 202         if (clear_start_mask)
 203                 card->thread_start_mask &= threads;
 204         spin_unlock_irqrestore(&card->thread_mask_lock, flags);
 205         wake_up(&card->wait_q);
 206 }
 207 EXPORT_SYMBOL_GPL(qeth_set_allowed_threads);
 208
 209 int qeth_threads_running(struct qeth_card *card, unsigned long threads)
 210 {
 211         unsigned long flags;
 212         int rc = 0;
 213
 214         spin_lock_irqsave(&card->thread_mask_lock, flags);
 215         rc = (card->thread_running_mask & threads);
 216         spin_unlock_irqrestore(&card->thread_mask_lock, flags);
 217         return rc;
 218 }
 219 EXPORT_SYMBOL_GPL(qeth_threads_running);
 220
 221 void qeth_clear_working_pool_list(struct qeth_card *card)
 222 {
 223         struct qeth_buffer_pool_entry *pool_entry, *tmp;
 224
 225         QETH_CARD_TEXT(card, 5, "clwrklst");
 226         list_for_each_entry_safe(pool_entry, tmp,
 227                             &card->qdio.in_buf_pool.entry_list, list){
 228                         list_del(&pool_entry->list);
 229         }
 230 }
 231 EXPORT_SYMBOL_GPL(qeth_clear_working_pool_list);
 232
 233 static int qeth_alloc_buffer_pool(struct qeth_card *card)
 234 {
 235         struct qeth_buffer_pool_entry *pool_entry;
 236         void *ptr;
 237         int i, j;
 238
 239         QETH_CARD_TEXT(card, 5, "alocpool");
 240         for (i = 0; i < card->qdio.init_pool.buf_count; ++i) {
 241                 pool_entry = kzalloc(sizeof(*pool_entry), GFP_KERNEL);
 242                 if (!pool_entry) {
 243                         qeth_free_buffer_pool(card);
 244                         return -ENOMEM;
 245                 }
 246                 for (j = 0; j < QETH_MAX_BUFFER_ELEMENTS(card); ++j) {
 247                         ptr = (void *) __get_free_page(GFP_KERNEL);
 248                         if (!ptr) {
 249                                 while (j > 0)
 250                                         free_page((unsigned long)
 251                                                   pool_entry->elements[--j]);
 252                                 kfree(pool_entry);
 253                                 qeth_free_buffer_pool(card);
 254                                 return -ENOMEM;
 255                         }
 256                         pool_entry->elements[j] = ptr;
 257                 }
 258                 list_add(&pool_entry->init_list,
 259                          &card->qdio.init_pool.entry_list);
 260         }
 261         return 0;
 262 }
 263
 264 int qeth_realloc_buffer_pool(struct qeth_card *card, int bufcnt)
 265 {
 266         QETH_CARD_TEXT(card, 2, "realcbp");
 267
 268         if ((card->state != CARD_STATE_DOWN) &&
 269             (card->state != CARD_STATE_RECOVER))
 270                 return -EPERM;
 271
 272         /* TODO: steel/add buffers from/to a running card's buffer pool (?) */
 273         qeth_clear_working_pool_list(card);
 274         qeth_free_buffer_pool(card);
 275         card->qdio.in_buf_pool.buf_count = bufcnt;
 276         card->qdio.init_pool.buf_count = bufcnt;
 277         return qeth_alloc_buffer_pool(card);
 278 }
 279 EXPORT_SYMBOL_GPL(qeth_realloc_buffer_pool);
 280
 281 static void qeth_free_qdio_queue(struct qeth_qdio_q *q)
 282 {
 283         if (!q)
 284                 return;
 285
 286         qdio_free_buffers(q->qdio_bufs, QDIO_MAX_BUFFERS_PER_Q);
 287         kfree(q);
 288 }
 289
 290 static struct qeth_qdio_q *qeth_alloc_qdio_queue(void)
 291 {
 292         struct qeth_qdio_q *q = kzalloc(sizeof(*q), GFP_KERNEL);
 293         int i;
 294
 295         if (!q)
 296                 return NULL;
 297
 298         if (qdio_alloc_buffers(q->qdio_bufs, QDIO_MAX_BUFFERS_PER_Q)) {
 299                 kfree(q);
 300                 return NULL;
 301         }
 302
 303         for (i = 0; i < QDIO_MAX_BUFFERS_PER_Q; ++i)
 304                 q->bufs[i].buffer = q->qdio_bufs[i];
 305
 306         QETH_DBF_HEX(SETUP, 2, &q, sizeof(void *));
 307         return q;
 308 }
 309
 310 static int qeth_cq_init(struct qeth_card *card)
 311 {
 312         int rc;
 313
 314         if (card->options.cq == QETH_CQ_ENABLED) {
 315                 QETH_DBF_TEXT(SETUP, 2, "cqinit");
 316                 qdio_reset_buffers(card->qdio.c_q->qdio_bufs,
 317                                    QDIO_MAX_BUFFERS_PER_Q);
 318                 card->qdio.c_q->next_buf_to_init = 127;
 319                 rc = do_QDIO(CARD_DDEV(card), QDIO_FLAG_SYNC_INPUT,
 320                              card->qdio.no_in_queues - 1, 0,
 321                              127);
 322                 if (rc) {
 323                         QETH_DBF_TEXT_(SETUP, 2, "1err%d", rc);
 324                         goto out;
 325                 }
 326         }
 327         rc = 0;
 328 out:
 329         return rc;
 330 }
 331
 332 static int qeth_alloc_cq(struct qeth_card *card)
 333 {
 334         int rc;
 335
 336         if (card->options.cq == QETH_CQ_ENABLED) {
 337                 int i;
 338                 struct qdio_outbuf_state *outbuf_states;
 339
 340                 QETH_DBF_TEXT(SETUP, 2, "cqon");
 341                 card->qdio.c_q = qeth_alloc_qdio_queue();
 342                 if (!card->qdio.c_q) {
 343                         rc = -1;
 344                         goto kmsg_out;
 345                 }
 346                 card->qdio.no_in_queues = 2;
 347                 card->qdio.out_bufstates =
 348                         kcalloc(card->qdio.no_out_queues *
 349                                         QDIO_MAX_BUFFERS_PER_Q,
 350                                 sizeof(struct qdio_outbuf_state),
 351                                 GFP_KERNEL);
 352                 outbuf_states = card->qdio.out_bufstates;
 353                 if (outbuf_states == NULL) {
 354                         rc = -1;
 355                         goto free_cq_out;
 356                 }
 357                 for (i = 0; i < card->qdio.no_out_queues; ++i) {
 358                         card->qdio.out_qs[i]->bufstates = outbuf_states;
 359                         outbuf_states += QDIO_MAX_BUFFERS_PER_Q;
 360                 }
 361         } else {
 362                 QETH_DBF_TEXT(SETUP, 2, "nocq");
 363                 card->qdio.c_q = NULL;
 364                 card->qdio.no_in_queues = 1;
 365         }
 366         QETH_DBF_TEXT_(SETUP, 2, "iqc%d", card->qdio.no_in_queues);
 367         rc = 0;
 368 out:
 369         return rc;
 370 free_cq_out:
 371         qeth_free_qdio_queue(card->qdio.c_q);
 372         card->qdio.c_q = NULL;
 373 kmsg_out:
 374         dev_err(&card->gdev->dev, "Failed to create completion queue\n");
 375         goto out;
 376 }
 377
 378 static void qeth_free_cq(struct qeth_card *card)
 379 {
 380         if (card->qdio.c_q) {
 381                 --card->qdio.no_in_queues;
 382                 qeth_free_qdio_queue(card->qdio.c_q);
 383                 card->qdio.c_q = NULL;
 384         }
 385         kfree(card->qdio.out_bufstates);
 386         card->qdio.out_bufstates = NULL;
 387 }
 388
 389 static enum iucv_tx_notify qeth_compute_cq_notification(int sbalf15,
 390                                                         int delayed)
 391 {
 392         enum iucv_tx_notify n;
 393
 394         switch (sbalf15) {
 395         case 0:
 396                 n = delayed ? TX_NOTIFY_DELAYED_OK : TX_NOTIFY_OK;
 397                 break;
 398         case 4:
 399         case 16:
 400         case 17:
 401         case 18:
 402                 n = delayed ? TX_NOTIFY_DELAYED_UNREACHABLE :
 403                         TX_NOTIFY_UNREACHABLE;
 404                 break;
 405         default:
 406                 n = delayed ? TX_NOTIFY_DELAYED_GENERALERROR :
 407                         TX_NOTIFY_GENERALERROR;
 408                 break;
 409         }
 410
 411         return n;
 412 }
 413
 414 static void qeth_cleanup_handled_pending(struct qeth_qdio_out_q *q, int bidx,
 415                                          int forced_cleanup)
 416 {
 417         if (q->card->options.cq != QETH_CQ_ENABLED)
 418                 return;
 419
 420         if (q->bufs[bidx]->next_pending != NULL) {
 421                 struct qeth_qdio_out_buffer *head = q->bufs[bidx];
 422                 struct qeth_qdio_out_buffer *c = q->bufs[bidx]->next_pending;
 423
 424                 while (c) {
 425                         if (forced_cleanup ||
 426                             atomic_read(&c->state) ==
 427                               QETH_QDIO_BUF_HANDLED_DELAYED) {
 428                                 struct qeth_qdio_out_buffer *f = c;
 429                                 QETH_CARD_TEXT(f->q->card, 5, "fp");
 430                                 QETH_CARD_TEXT_(f->q->card, 5, "%lx", (long) f);
 431                                 /* release here to avoid interleaving between
 432                                    outbound tasklet and inbound tasklet
 433                                    regarding notifications and lifecycle */
 434                                 qeth_release_skbs(c);
 435
 436                                 c = f->next_pending;
 437                                 WARN_ON_ONCE(head->next_pending != f);
 438                                 head->next_pending = c;
 439                                 kmem_cache_free(qeth_qdio_outbuf_cache, f);
 440                         } else {
 441                                 head = c;
 442                                 c = c->next_pending;
 443                         }
 444
 445                 }
 446         }
 447         if (forced_cleanup && (atomic_read(&(q->bufs[bidx]->state)) ==
 448                                         QETH_QDIO_BUF_HANDLED_DELAYED)) {
 449                 /* for recovery situations */
 450                 qeth_init_qdio_out_buf(q, bidx);
 451                 QETH_CARD_TEXT(q->card, 2, "clprecov");
 452         }
 453 }
 454
 455
 456 static void qeth_qdio_handle_aob(struct qeth_card *card,
 457                                  unsigned long phys_aob_addr)
 458 {
 459         struct qaob *aob;
 460         struct qeth_qdio_out_buffer *buffer;
 461         enum iucv_tx_notify notification;
 462         unsigned int i;
 463
 464         aob = (struct qaob *) phys_to_virt(phys_aob_addr);
 465         QETH_CARD_TEXT(card, 5, "haob");
 466         QETH_CARD_TEXT_(card, 5, "%lx", phys_aob_addr);
 467         buffer = (struct qeth_qdio_out_buffer *) aob->user1;
 468         QETH_CARD_TEXT_(card, 5, "%lx", aob->user1);
 469
 470         if (atomic_cmpxchg(&buffer->state, QETH_QDIO_BUF_PRIMED,
 471                            QETH_QDIO_BUF_IN_CQ) == QETH_QDIO_BUF_PRIMED) {
 472                 notification = TX_NOTIFY_OK;
 473         } else {
 474                 WARN_ON_ONCE(atomic_read(&buffer->state) !=
 475                                                         QETH_QDIO_BUF_PENDING);
 476                 atomic_set(&buffer->state, QETH_QDIO_BUF_IN_CQ);
 477                 notification = TX_NOTIFY_DELAYED_OK;
 478         }
 479
 480         if (aob->aorc != 0)  {
 481                 QETH_CARD_TEXT_(card, 2, "aorc%02X", aob->aorc);
 482                 notification = qeth_compute_cq_notification(aob->aorc, 1);
 483         }
 484         qeth_notify_skbs(buffer->q, buffer, notification);
 485
 486         /* Free dangling allocations. The attached skbs are handled by
 487          * qeth_cleanup_handled_pending().
 488          */
 489         for (i = 0;
 490              i < aob->sb_count && i < QETH_MAX_BUFFER_ELEMENTS(card);
 491              i++) {
 492                 if (aob->sba[i] && buffer->is_header[i])
 493                         kmem_cache_free(qeth_core_header_cache,
 494                                         (void *) aob->sba[i]);
 495         }
 496         atomic_set(&buffer->state, QETH_QDIO_BUF_HANDLED_DELAYED);
 497
 498         qdio_release_aob(aob);
 499 }
 500
 501 static inline int qeth_is_cq(struct qeth_card *card, unsigned int queue)
 502 {
 503         return card->options.cq == QETH_CQ_ENABLED &&
 504             card->qdio.c_q != NULL &&
 505             queue != 0 &&
 506             queue == card->qdio.no_in_queues - 1;
 507 }
 508
 509 static void qeth_setup_ccw(struct ccw1 *ccw, u8 cmd_code, u32 len, void *data)
 510 {
 511         ccw->cmd_code = cmd_code;
 512         ccw->flags = CCW_FLAG_SLI;
 513         ccw->count = len;
 514         ccw->cda = (__u32) __pa(data);
 515 }
 516
 517 static int __qeth_issue_next_read(struct qeth_card *card)
 518 {
 519         struct qeth_channel *channel = &card->read;
 520         struct qeth_cmd_buffer *iob;
 521         int rc;
 522
 523         QETH_CARD_TEXT(card, 5, "issnxrd");
 524         if (channel->state != CH_STATE_UP)
 525                 return -EIO;
 526         iob = qeth_get_buffer(channel);
 527         if (!iob) {
 528                 dev_warn(&card->gdev->dev, "The qeth device driver "
 529                         "failed to recover an error on the device\n");
 530                 QETH_DBF_MESSAGE(2, "issue_next_read on device %x failed: no iob available\n",
 531                                  CARD_DEVID(card));
 532                 return -ENOMEM;
 533         }
 534         qeth_setup_ccw(channel->ccw, CCW_CMD_READ, QETH_BUFSIZE, iob->data);
 535         QETH_CARD_TEXT(card, 6, "noirqpnd");
 536         rc = ccw_device_start(channel->ccwdev, channel->ccw,
 537                               (addr_t) iob, 0, 0);
 538         if (rc) {
 539                 QETH_DBF_MESSAGE(2, "error %i on device %x when starting next read ccw!\n",
 540                                  rc, CARD_DEVID(card));
 541                 atomic_set(&channel->irq_pending, 0);
 542                 qeth_release_buffer(channel, iob);
 543                 card->read_or_write_problem = 1;
 544                 qeth_schedule_recovery(card);
 545                 wake_up(&card->wait_q);
 546         }
 547         return rc;
 548 }
 549
 550 static int qeth_issue_next_read(struct qeth_card *card)
 551 {
 552         int ret;
 553
 554         spin_lock_irq(get_ccwdev_lock(CARD_RDEV(card)));
 555         ret = __qeth_issue_next_read(card);
 556         spin_unlock_irq(get_ccwdev_lock(CARD_RDEV(card)));
 557
 558         return ret;
 559 }
 560
 561 static struct qeth_reply *qeth_alloc_reply(struct qeth_card *card)
 562 {
 563         struct qeth_reply *reply;
 564
 565         reply = kzalloc(sizeof(struct qeth_reply), GFP_ATOMIC);
 566         if (reply) {
 567                 refcount_set(&reply->refcnt, 1);
 568                 atomic_set(&reply->received, 0);
 569                 init_waitqueue_head(&reply->wait_q);
 570         }
 571         return reply;
 572 }
 573
 574 static void qeth_get_reply(struct qeth_reply *reply)
 575 {
 576         refcount_inc(&reply->refcnt);
 577 }
 578
 579 static void qeth_put_reply(struct qeth_reply *reply)
 580 {
 581         if (refcount_dec_and_test(&reply->refcnt))
 582                 kfree(reply);
 583 }
 584
 585 static void qeth_enqueue_reply(struct qeth_card *card, struct qeth_reply *reply)
 586 {
 587         spin_lock_irq(&card->lock);
 588         list_add_tail(&reply->list, &card->cmd_waiter_list);
 589         spin_unlock_irq(&card->lock);
 590 }
 591
 592 static void qeth_dequeue_reply(struct qeth_card *card, struct qeth_reply *reply)
 593 {
 594         spin_lock_irq(&card->lock);
 595         list_del(&reply->list);
 596         spin_unlock_irq(&card->lock);
 597 }
 598
 599 static void qeth_notify_reply(struct qeth_reply *reply)
 600 {
 601         atomic_inc(&reply->received);
 602         wake_up(&reply->wait_q);
 603 }
 604
 605 static void qeth_issue_ipa_msg(struct qeth_ipa_cmd *cmd, int rc,
 606                 struct qeth_card *card)
 607 {
 608         const char *ipa_name;
 609         int com = cmd->hdr.command;
 610         ipa_name = qeth_get_ipa_cmd_name(com);
 611
 612         if (rc)
 613                 QETH_DBF_MESSAGE(2, "IPA: %s(%#x) for device %x returned %#x \"%s\"\n",
 614                                  ipa_name, com, CARD_DEVID(card), rc,
 615                                  qeth_get_ipa_msg(rc));
 616         else
 617                 QETH_DBF_MESSAGE(5, "IPA: %s(%#x) for device %x succeeded\n",
 618                                  ipa_name, com, CARD_DEVID(card));
 619 }
 620
 621 static struct qeth_ipa_cmd *qeth_check_ipa_data(struct qeth_card *card,
 622                                                 struct qeth_ipa_cmd *cmd)
 623 {
 624         QETH_CARD_TEXT(card, 5, "chkipad");
 625
 626         if (IS_IPA_REPLY(cmd)) {
 627                 if (cmd->hdr.command != IPA_CMD_SETCCID &&
 628                     cmd->hdr.command != IPA_CMD_DELCCID &&
 629                     cmd->hdr.command != IPA_CMD_MODCCID &&
 630                     cmd->hdr.command != IPA_CMD_SET_DIAG_ASS)
 631                         qeth_issue_ipa_msg(cmd, cmd->hdr.return_code, card);
 632                 return cmd;
 633         }
 634
 635         /* handle unsolicited event: */
 636         switch (cmd->hdr.command) {
 637         case IPA_CMD_STOPLAN:
 638                 if (cmd->hdr.return_code == IPA_RC_VEPA_TO_VEB_TRANSITION) {
 639                         dev_err(&card->gdev->dev,
 640                                 "Interface %s is down because the adjacent port is no longer in reflective relay mode\n",
 641                                 QETH_CARD_IFNAME(card));
 642                         qeth_close_dev(card);
 643                 } else {
 644                         dev_warn(&card->gdev->dev,
 645                                  "The link for interface %s on CHPID 0x%X failed\n",
 646                                  QETH_CARD_IFNAME(card), card->info.chpid);
 647                         qeth_issue_ipa_msg(cmd, cmd->hdr.return_code, card);
 648                         netif_carrier_off(card->dev);
 649                 }
 650                 return NULL;
 651         case IPA_CMD_STARTLAN:
 652                 dev_info(&card->gdev->dev,
 653                          "The link for %s on CHPID 0x%X has been restored\n",
 654                          QETH_CARD_IFNAME(card), card->info.chpid);
 655                 if (card->info.hwtrap)
 656                         card->info.hwtrap = 2;
 657                 qeth_schedule_recovery(card);
 658                 return NULL;
 659         case IPA_CMD_SETBRIDGEPORT_IQD:
 660         case IPA_CMD_SETBRIDGEPORT_OSA:
 661         case IPA_CMD_ADDRESS_CHANGE_NOTIF:
 662                 if (card->discipline->control_event_handler(card, cmd))
 663                         return cmd;
 664                 return NULL;
 665         case IPA_CMD_MODCCID:
 666                 return cmd;
 667         case IPA_CMD_REGISTER_LOCAL_ADDR:
 668                 QETH_CARD_TEXT(card, 3, "irla");
 669                 return NULL;
 670         case IPA_CMD_UNREGISTER_LOCAL_ADDR:
 671                 QETH_CARD_TEXT(card, 3, "urla");
 672                 return NULL;
 673         default:
 674                 QETH_DBF_MESSAGE(2, "Received data is IPA but not a reply!\n");
 675                 return cmd;
 676         }
 677 }
 678
 679 void qeth_clear_ipacmd_list(struct qeth_card *card)
 680 {
 681         struct qeth_reply *reply;
 682         unsigned long flags;
 683
 684         QETH_CARD_TEXT(card, 4, "clipalst");
 685
 686         spin_lock_irqsave(&card->lock, flags);
 687         list_for_each_entry(reply, &card->cmd_waiter_list, list) {
 688                 reply->rc = -EIO;
 689                 qeth_notify_reply(reply);
 690         }
 691         spin_unlock_irqrestore(&card->lock, flags);
 692 }
 693 EXPORT_SYMBOL_GPL(qeth_clear_ipacmd_list);
 694
 695 static int qeth_check_idx_response(struct qeth_card *card,
 696         unsigned char *buffer)
 697 {
 698         if (!buffer)
 699                 return 0;
 700
 701         QETH_DBF_HEX(CTRL, 2, buffer, QETH_DBF_CTRL_LEN);
 702         if ((buffer[2] & 0xc0) == 0xc0) {
 703                 QETH_DBF_MESSAGE(2, "received an IDX TERMINATE with cause code %#04x\n",
 704                                  buffer[4]);
 705                 QETH_CARD_TEXT(card, 2, "ckidxres");
 706                 QETH_CARD_TEXT(card, 2, " idxterm");
 707                 QETH_CARD_TEXT_(card, 2, "  rc%d", -EIO);
 708                 if (buffer[4] == 0xf6) {
 709                         dev_err(&card->gdev->dev,
 710                         "The qeth device is not configured "
 711                         "for the OSI layer required by z/VM\n");
 712                         return -EPERM;
 713                 }
 714                 return -EIO;
 715         }
 716         return 0;
 717 }
 718
 719 static struct qeth_cmd_buffer *__qeth_get_buffer(struct qeth_channel *channel)
 720 {
 721         __u8 index;
 722
 723         index = channel->io_buf_no;
 724         do {
 725                 if (channel->iob[index].state == BUF_STATE_FREE) {
 726                         channel->iob[index].state = BUF_STATE_LOCKED;
 727                         channel->io_buf_no = (channel->io_buf_no + 1) %
 728                                 QETH_CMD_BUFFER_NO;
 729                         memset(channel->iob[index].data, 0, QETH_BUFSIZE);
 730                         return channel->iob + index;
 731                 }
 732                 index = (index + 1) % QETH_CMD_BUFFER_NO;
 733         } while (index != channel->io_buf_no);
 734
 735         return NULL;
 736 }
 737
 738 void qeth_release_buffer(struct qeth_channel *channel,
 739                 struct qeth_cmd_buffer *iob)
 740 {
 741         unsigned long flags;
 742
 743         spin_lock_irqsave(&channel->iob_lock, flags);
 744         iob->state = BUF_STATE_FREE;
 745         iob->callback = qeth_send_control_data_cb;
 746         if (iob->reply) {
 747                 qeth_put_reply(iob->reply);
 748                 iob->reply = NULL;
 749         }
 750         iob->rc = 0;
 751         spin_unlock_irqrestore(&channel->iob_lock, flags);
 752         wake_up(&channel->wait_q);
 753 }
 754 EXPORT_SYMBOL_GPL(qeth_release_buffer);
 755
 756 static void qeth_release_buffer_cb(struct qeth_card *card,
 757                                    struct qeth_channel *channel,
 758                                    struct qeth_cmd_buffer *iob)
 759 {
 760         qeth_release_buffer(channel, iob);
 761 }
 762
 763 static void qeth_cancel_cmd(struct qeth_cmd_buffer *iob, int rc)
 764 {
 765         struct qeth_reply *reply = iob->reply;
 766
 767         if (reply) {
 768                 reply->rc = rc;
 769                 qeth_notify_reply(reply);
 770         }
 771         qeth_release_buffer(iob->channel, iob);
 772 }
 773
 774 static struct qeth_cmd_buffer *qeth_get_buffer(struct qeth_channel *channel)
 775 {
 776         struct qeth_cmd_buffer *buffer = NULL;
 777         unsigned long flags;
 778
 779         spin_lock_irqsave(&channel->iob_lock, flags);
 780         buffer = __qeth_get_buffer(channel);
 781         spin_unlock_irqrestore(&channel->iob_lock, flags);
 782         return buffer;
 783 }
 784
 785 struct qeth_cmd_buffer *qeth_wait_for_buffer(struct qeth_channel *channel)
 786 {
 787         struct qeth_cmd_buffer *buffer;
 788         wait_event(channel->wait_q,
 789                    ((buffer = qeth_get_buffer(channel)) != NULL));
 790         return buffer;
 791 }
 792 EXPORT_SYMBOL_GPL(qeth_wait_for_buffer);
 793
 794 void qeth_clear_cmd_buffers(struct qeth_channel *channel)
 795 {
 796         int cnt;
 797
 798         for (cnt = 0; cnt < QETH_CMD_BUFFER_NO; cnt++)
 799                 qeth_release_buffer(channel, &channel->iob[cnt]);
 800         channel->io_buf_no = 0;
 801 }
 802 EXPORT_SYMBOL_GPL(qeth_clear_cmd_buffers);
 803
 804 static void qeth_send_control_data_cb(struct qeth_card *card,
 805                                       struct qeth_channel *channel,
 806                                       struct qeth_cmd_buffer *iob)
 807 {
 808         struct qeth_ipa_cmd *cmd = NULL;
 809         struct qeth_reply *reply = NULL;
 810         struct qeth_reply *r;
 811         unsigned long flags;
 812         int keep_reply = 0;
 813         int rc = 0;
 814
 815         QETH_CARD_TEXT(card, 4, "sndctlcb");
 816         rc = qeth_check_idx_response(card, iob->data);
 817         switch (rc) {
 818         case 0:
 819                 break;
 820         case -EIO:
 821                 qeth_clear_ipacmd_list(card);
 822                 qeth_schedule_recovery(card);
 823                 /* fall through */
 824         default:
 825                 goto out;
 826         }
 827
 828         if (IS_IPA(iob->data)) {
 829                 cmd = (struct qeth_ipa_cmd *) PDU_ENCAPSULATION(iob->data);
 830                 cmd = qeth_check_ipa_data(card, cmd);
 831                 if (!cmd)
 832                         goto out;
 833                 if (IS_OSN(card) && card->osn_info.assist_cb &&
 834                     cmd->hdr.command != IPA_CMD_STARTLAN) {
 835                         card->osn_info.assist_cb(card->dev, cmd);
 836                         goto out;
 837                 }
 838         } else {
 839                 /* non-IPA commands should only flow during initialization */
 840                 if (card->state != CARD_STATE_DOWN)
 841                         goto out;
 842         }
 843
 844         /* match against pending cmd requests */
 845         spin_lock_irqsave(&card->lock, flags);
 846         list_for_each_entry(r, &card->cmd_waiter_list, list) {
 847                 if ((r->seqno == QETH_IDX_COMMAND_SEQNO) ||
 848                     (cmd && (r->seqno == cmd->hdr.seqno))) {
 849                         reply = r;
 850                         /* take the object outside the lock */
 851                         qeth_get_reply(reply);
 852                         break;
 853                 }
 854         }
 855         spin_unlock_irqrestore(&card->lock, flags);
 856
 857         if (!reply)
 858                 goto out;
 859
 860         if (reply->callback) {
 861                 if (cmd) {
 862                         reply->offset = (u16)((char *)cmd - (char *)iob->data);
 863                         keep_reply = reply->callback(card, reply,
 864                                                      (unsigned long)cmd);
 865                 } else
 866                         keep_reply = reply->callback(card, reply,
 867                                                      (unsigned long)iob);
 868         }
 869         if (cmd)
 870                 reply->rc = (u16) cmd->hdr.return_code;
 871         else if (iob->rc)
 872                 reply->rc = iob->rc;
 873
 874         if (!keep_reply)
 875                 qeth_notify_reply(reply);
 876         qeth_put_reply(reply);
 877
 878 out:
 879         memcpy(&card->seqno.pdu_hdr_ack,
 880                 QETH_PDU_HEADER_SEQ_NO(iob->data),
 881                 QETH_SEQ_NO_LENGTH);
 882         qeth_release_buffer(channel, iob);
 883 }
 884
 885 static int qeth_set_thread_start_bit(struct qeth_card *card,
 886                 unsigned long thread)
 887 {
 888         unsigned long flags;
 889
 890         spin_lock_irqsave(&card->thread_mask_lock, flags);
 891         if (!(card->thread_allowed_mask & thread) ||
 892               (card->thread_start_mask & thread)) {
 893                 spin_unlock_irqrestore(&card->thread_mask_lock, flags);
 894                 return -EPERM;
 895         }
 896         card->thread_start_mask |= thread;
 897         spin_unlock_irqrestore(&card->thread_mask_lock, flags);
 898         return 0;
 899 }
 900
 901 void qeth_clear_thread_start_bit(struct qeth_card *card, unsigned long thread)
 902 {
 903         unsigned long flags;
 904
 905         spin_lock_irqsave(&card->thread_mask_lock, flags);
 906         card->thread_start_mask &= ~thread;
 907         spin_unlock_irqrestore(&card->thread_mask_lock, flags);
 908         wake_up(&card->wait_q);
 909 }
 910 EXPORT_SYMBOL_GPL(qeth_clear_thread_start_bit);
 911
 912 void qeth_clear_thread_running_bit(struct qeth_card *card, unsigned long thread)
 913 {
 914         unsigned long flags;
 915
 916         spin_lock_irqsave(&card->thread_mask_lock, flags);
 917         card->thread_running_mask &= ~thread;
 918         spin_unlock_irqrestore(&card->thread_mask_lock, flags);
 919         wake_up_all(&card->wait_q);
 920 }
 921 EXPORT_SYMBOL_GPL(qeth_clear_thread_running_bit);
 922
 923 static int __qeth_do_run_thread(struct qeth_card *card, unsigned long thread)
 924 {
 925         unsigned long flags;
 926         int rc = 0;
 927
 928         spin_lock_irqsave(&card->thread_mask_lock, flags);
 929         if (card->thread_start_mask & thread) {
 930                 if ((card->thread_allowed_mask & thread) &&
 931                     !(card->thread_running_mask & thread)) {
 932                         rc = 1;
 933                         card->thread_start_mask &= ~thread;
 934                         card->thread_running_mask |= thread;
 935                 } else
 936                         rc = -EPERM;
 937         }
 938         spin_unlock_irqrestore(&card->thread_mask_lock, flags);
 939         return rc;
 940 }
 941
 942 int qeth_do_run_thread(struct qeth_card *card, unsigned long thread)
 943 {
 944         int rc = 0;
 945
 946         wait_event(card->wait_q,
 947                    (rc = __qeth_do_run_thread(card, thread)) >= 0);
 948         return rc;
 949 }
 950 EXPORT_SYMBOL_GPL(qeth_do_run_thread);
 951
 952 void qeth_schedule_recovery(struct qeth_card *card)
 953 {
 954         QETH_CARD_TEXT(card, 2, "startrec");
 955         if (qeth_set_thread_start_bit(card, QETH_RECOVER_THREAD) == 0)
 956                 schedule_work(&card->kernel_thread_starter);
 957 }
 958 EXPORT_SYMBOL_GPL(qeth_schedule_recovery);
 959
 960 static int qeth_get_problem(struct qeth_card *card, struct ccw_device *cdev,
 961                             struct irb *irb)
 962 {
 963         int dstat, cstat;
 964         char *sense;
 965
 966         sense = (char *) irb->ecw;
 967         cstat = irb->scsw.cmd.cstat;
 968         dstat = irb->scsw.cmd.dstat;
 969
 970         if (cstat & (SCHN_STAT_CHN_CTRL_CHK | SCHN_STAT_INTF_CTRL_CHK |
 971                      SCHN_STAT_CHN_DATA_CHK | SCHN_STAT_CHAIN_CHECK |
 972                      SCHN_STAT_PROT_CHECK | SCHN_STAT_PROG_CHECK)) {
 973                 QETH_CARD_TEXT(card, 2, "CGENCHK");
 974                 dev_warn(&cdev->dev, "The qeth device driver "
 975                         "failed to recover an error on the device\n");
 976                 QETH_DBF_MESSAGE(2, "check on channel %x with dstat=%#x, cstat=%#x\n",
 977                                  CCW_DEVID(cdev), dstat, cstat);
 978                 print_hex_dump(KERN_WARNING, "qeth: irb ", DUMP_PREFIX_OFFSET,
 979                                 16, 1, irb, 64, 1);
 980                 return 1;
 981         }
 982
 983         if (dstat & DEV_STAT_UNIT_CHECK) {
 984                 if (sense[SENSE_RESETTING_EVENT_BYTE] &
 985                     SENSE_RESETTING_EVENT_FLAG) {
 986                         QETH_CARD_TEXT(card, 2, "REVIND");
 987                         return 1;
 988                 }
 989                 if (sense[SENSE_COMMAND_REJECT_BYTE] &
 990                     SENSE_COMMAND_REJECT_FLAG) {
 991                         QETH_CARD_TEXT(card, 2, "CMDREJi");
 992                         return 1;
 993                 }
 994                 if ((sense[2] == 0xaf) && (sense[3] == 0xfe)) {
 995                         QETH_CARD_TEXT(card, 2, "AFFE");
 996                         return 1;
 997                 }
 998                 if ((!sense[0]) && (!sense[1]) && (!sense[2]) && (!sense[3])) {
 999                         QETH_CARD_TEXT(card, 2, "ZEROSEN");
1000                         return 0;
1001                 }
1002                 QETH_CARD_TEXT(card, 2, "DGENCHK");
1003                         return 1;
1004         }
1005         return 0;
1006 }
1007
1008 static int qeth_check_irb_error(struct qeth_card *card, struct ccw_device *cdev,
1009                                 unsigned long intparm, struct irb *irb)
1010 {
1011         if (!IS_ERR(irb))
1012                 return 0;
1013
1014         switch (PTR_ERR(irb)) {
1015         case -EIO:
1016                 QETH_DBF_MESSAGE(2, "i/o-error on channel %x\n",
1017                                  CCW_DEVID(cdev));
1018                 QETH_CARD_TEXT(card, 2, "ckirberr");
1019                 QETH_CARD_TEXT_(card, 2, "  rc%d", -EIO);
1020                 return -EIO;
1021         case -ETIMEDOUT:
1022                 dev_warn(&cdev->dev, "A hardware operation timed out"
1023                         " on the device\n");
1024                 QETH_CARD_TEXT(card, 2, "ckirberr");
1025                 QETH_CARD_TEXT_(card, 2, "  rc%d", -ETIMEDOUT);
1026                 if (intparm == QETH_RCD_PARM) {
1027                         if (card->data.ccwdev == cdev) {
1028                                 card->data.state = CH_STATE_DOWN;
1029                                 wake_up(&card->wait_q);
1030                         }
1031                 }
1032                 return -ETIMEDOUT;
1033         default:
1034                 QETH_DBF_MESSAGE(2, "unknown error %ld on channel %x\n",
1035                                  PTR_ERR(irb), CCW_DEVID(cdev));
1036                 QETH_CARD_TEXT(card, 2, "ckirberr");
1037                 QETH_CARD_TEXT(card, 2, "  rc???");
1038                 return PTR_ERR(irb);
1039         }
1040 }
1041
1042 static void qeth_irq(struct ccw_device *cdev, unsigned long intparm,
1043                 struct irb *irb)
1044 {
1045         int rc;
1046         int cstat, dstat;
1047         struct qeth_cmd_buffer *iob = NULL;
1048         struct ccwgroup_device *gdev;
1049         struct qeth_channel *channel;
1050         struct qeth_card *card;
1051
1052         /* while we hold the ccwdev lock, this stays valid: */
1053         gdev = dev_get_drvdata(&cdev->dev);
1054         card = dev_get_drvdata(&gdev->dev);
1055         if (!card)
1056                 return;
1057
1058         QETH_CARD_TEXT(card, 5, "irq");
1059
1060         if (card->read.ccwdev == cdev) {
1061                 channel = &card->read;
1062                 QETH_CARD_TEXT(card, 5, "read");
1063         } else if (card->write.ccwdev == cdev) {
1064                 channel = &card->write;
1065                 QETH_CARD_TEXT(card, 5, "write");
1066         } else {
1067                 channel = &card->data;
1068                 QETH_CARD_TEXT(card, 5, "data");
1069         }
1070
1071         if (qeth_intparm_is_iob(intparm))
1072                 iob = (struct qeth_cmd_buffer *) __va((addr_t)intparm);
1073
1074         rc = qeth_check_irb_error(card, cdev, intparm, irb);
1075         if (rc) {
1076                 /* IO was terminated, free its resources. */
1077                 if (iob)
1078                         qeth_cancel_cmd(iob, rc);
1079                 atomic_set(&channel->irq_pending, 0);
1080                 wake_up(&card->wait_q);
1081                 return;
1082         }
1083
1084         atomic_set(&channel->irq_pending, 0);
1085
1086         if (irb->scsw.cmd.fctl & (SCSW_FCTL_CLEAR_FUNC))
1087                 channel->state = CH_STATE_STOPPED;
1088
1089         if (irb->scsw.cmd.fctl & (SCSW_FCTL_HALT_FUNC))
1090                 channel->state = CH_STATE_HALTED;
1091
1092         /*let's wake up immediately on data channel*/
1093         if ((channel == &card->data) && (intparm != 0) &&
1094             (intparm != QETH_RCD_PARM))
1095                 goto out;
1096
1097         if (intparm == QETH_CLEAR_CHANNEL_PARM) {
1098                 QETH_CARD_TEXT(card, 6, "clrchpar");
1099                 /* we don't have to handle this further */
1100                 intparm = 0;
1101         }
1102         if (intparm == QETH_HALT_CHANNEL_PARM) {
1103                 QETH_CARD_TEXT(card, 6, "hltchpar");
1104                 /* we don't have to handle this further */
1105                 intparm = 0;
1106         }
1107
1108         cstat = irb->scsw.cmd.cstat;
1109         dstat = irb->scsw.cmd.dstat;
1110
1111         if ((dstat & DEV_STAT_UNIT_EXCEP) ||
1112             (dstat & DEV_STAT_UNIT_CHECK) ||
1113             (cstat)) {
1114                 if (irb->esw.esw0.erw.cons) {
1115                         dev_warn(&channel->ccwdev->dev,
1116                                 "The qeth device driver failed to recover "
1117                                 "an error on the device\n");
1118                         QETH_DBF_MESSAGE(2, "sense data available on channel %x: cstat %#X dstat %#X\n",
1119                                          CCW_DEVID(channel->ccwdev), cstat,
1120                                          dstat);
1121                         print_hex_dump(KERN_WARNING, "qeth: irb ",
1122                                 DUMP_PREFIX_OFFSET, 16, 1, irb, 32, 1);
1123                         print_hex_dump(KERN_WARNING, "qeth: sense data ",
1124                                 DUMP_PREFIX_OFFSET, 16, 1, irb->ecw, 32, 1);
1125                 }
1126                 if (intparm == QETH_RCD_PARM) {
1127                         channel->state = CH_STATE_DOWN;
1128                         goto out;
1129                 }
1130                 rc = qeth_get_problem(card, cdev, irb);
1131                 if (rc) {
1132                         card->read_or_write_problem = 1;
1133                         if (iob)
1134                                 qeth_cancel_cmd(iob, rc);
1135                         qeth_clear_ipacmd_list(card);
1136                         qeth_schedule_recovery(card);
1137                         goto out;
1138                 }
1139         }
1140
1141         if (intparm == QETH_RCD_PARM) {
1142                 channel->state = CH_STATE_RCD_DONE;
1143                 goto out;
1144         }
1145         if (channel == &card->data)
1146                 return;
1147         if (channel == &card->read &&
1148             channel->state == CH_STATE_UP)
1149                 __qeth_issue_next_read(card);
1150
1151         if (iob && iob->callback)
1152                 iob->callback(card, iob->channel, iob);
1153
1154 out:
1155         wake_up(&card->wait_q);
1156         return;
1157 }
1158
1159 static void qeth_notify_skbs(struct qeth_qdio_out_q *q,
1160                 struct qeth_qdio_out_buffer *buf,
1161                 enum iucv_tx_notify notification)
1162 {
1163         struct sk_buff *skb;
1164
1165         skb_queue_walk(&buf->skb_list, skb) {
1166                 QETH_CARD_TEXT_(q->card, 5, "skbn%d", notification);
1167                 QETH_CARD_TEXT_(q->card, 5, "%lx", (long) skb);
1168                 if (skb->protocol == htons(ETH_P_AF_IUCV) && skb->sk)
1169                         iucv_sk(skb->sk)->sk_txnotify(skb, notification);
1170         }
1171 }
1172
1173 static void qeth_release_skbs(struct qeth_qdio_out_buffer *buf)
1174 {
1175         /* release may never happen from within CQ tasklet scope */
1176         WARN_ON_ONCE(atomic_read(&buf->state) == QETH_QDIO_BUF_IN_CQ);
1177
1178         if (atomic_read(&buf->state) == QETH_QDIO_BUF_PENDING)
1179                 qeth_notify_skbs(buf->q, buf, TX_NOTIFY_GENERALERROR);
1180
1181         __skb_queue_purge(&buf->skb_list);
1182 }
1183
1184 static void qeth_clear_output_buffer(struct qeth_qdio_out_q *queue,
1185                                      struct qeth_qdio_out_buffer *buf)
1186 {
1187         int i;
1188
1189         /* is PCI flag set on buffer? */
1190         if (buf->buffer->element[0].sflags & SBAL_SFLAGS0_PCI_REQ)
1191                 atomic_dec(&queue->set_pci_flags_count);
1192
1193         qeth_release_skbs(buf);
1194
1195         for (i = 0; i < QETH_MAX_BUFFER_ELEMENTS(queue->card); ++i) {
1196                 if (buf->buffer->element[i].addr && buf->is_header[i])
1197                         kmem_cache_free(qeth_core_header_cache,
1198                                 buf->buffer->element[i].addr);
1199                 buf->is_header[i] = 0;
1200         }
1201
1202         qeth_scrub_qdio_buffer(buf->buffer,
1203                                QETH_MAX_BUFFER_ELEMENTS(queue->card));
1204         buf->next_element_to_fill = 0;
1205         atomic_set(&buf->state, QETH_QDIO_BUF_EMPTY);
1206 }
1207
1208 static void qeth_clear_outq_buffers(struct qeth_qdio_out_q *q, int free)
1209 {
1210         int j;
1211
1212         for (j = 0; j < QDIO_MAX_BUFFERS_PER_Q; ++j) {
1213                 if (!q->bufs[j])
1214                         continue;
1215                 qeth_cleanup_handled_pending(q, j, 1);
1216                 qeth_clear_output_buffer(q, q->bufs[j]);
1217                 if (free) {
1218                         kmem_cache_free(qeth_qdio_outbuf_cache, q->bufs[j]);
1219                         q->bufs[j] = NULL;
1220                 }
1221         }
1222 }
1223
1224 void qeth_clear_qdio_buffers(struct qeth_card *card)
1225 {
1226         int i;
1227
1228         QETH_CARD_TEXT(card, 2, "clearqdbf");
1229         /* clear outbound buffers to free skbs */
1230         for (i = 0; i < card->qdio.no_out_queues; ++i) {
1231                 if (card->qdio.out_qs[i]) {
1232                         qeth_clear_outq_buffers(card->qdio.out_qs[i], 0);
1233                 }
1234         }
1235 }
1236 EXPORT_SYMBOL_GPL(qeth_clear_qdio_buffers);
1237
1238 static void qeth_free_buffer_pool(struct qeth_card *card)
1239 {
1240         struct qeth_buffer_pool_entry *pool_entry, *tmp;
1241         int i = 0;
1242         list_for_each_entry_safe(pool_entry, tmp,
1243                                  &card->qdio.init_pool.entry_list, init_list){
1244                 for (i = 0; i < QETH_MAX_BUFFER_ELEMENTS(card); ++i)
1245                         free_page((unsigned long)pool_entry->elements[i]);
1246                 list_del(&pool_entry->init_list);
1247                 kfree(pool_entry);
1248         }
1249 }
1250
1251 static void qeth_clean_channel(struct qeth_channel *channel)
1252 {
1253         struct ccw_device *cdev = channel->ccwdev;
1254         int cnt;
1255
1256         QETH_DBF_TEXT(SETUP, 2, "freech");
1257
1258         spin_lock_irq(get_ccwdev_lock(cdev));
1259         cdev->handler = NULL;
1260         spin_unlock_irq(get_ccwdev_lock(cdev));
1261
1262         for (cnt = 0; cnt < QETH_CMD_BUFFER_NO; cnt++)
1263                 kfree(channel->iob[cnt].data);
1264         kfree(channel->ccw);
1265 }
1266
1267 static int qeth_setup_channel(struct qeth_channel *channel, bool alloc_buffers)
1268 {
1269         struct ccw_device *cdev = channel->ccwdev;
1270         int cnt;
1271
1272         QETH_DBF_TEXT(SETUP, 2, "setupch");
1273
1274         channel->ccw = kmalloc(sizeof(struct ccw1), GFP_KERNEL | GFP_DMA);
1275         if (!channel->ccw)
1276                 return -ENOMEM;
1277         channel->state = CH_STATE_DOWN;
1278         atomic_set(&channel->irq_pending, 0);
1279         init_waitqueue_head(&channel->wait_q);
1280
1281         spin_lock_irq(get_ccwdev_lock(cdev));
1282         cdev->handler = qeth_irq;
1283         spin_unlock_irq(get_ccwdev_lock(cdev));
1284
1285         if (!alloc_buffers)
1286                 return 0;
1287
1288         for (cnt = 0; cnt < QETH_CMD_BUFFER_NO; cnt++) {
1289                 channel->iob[cnt].data = kmalloc(QETH_BUFSIZE,
1290                                                  GFP_KERNEL | GFP_DMA);
1291                 if (channel->iob[cnt].data == NULL)
1292                         break;
1293                 channel->iob[cnt].state = BUF_STATE_FREE;
1294                 channel->iob[cnt].channel = channel;
1295                 channel->iob[cnt].callback = qeth_send_control_data_cb;
1296                 channel->iob[cnt].rc = 0;
1297         }
1298         if (cnt < QETH_CMD_BUFFER_NO) {
1299                 qeth_clean_channel(channel);
1300                 return -ENOMEM;
1301         }
1302         channel->io_buf_no = 0;
1303         spin_lock_init(&channel->iob_lock);
1304
1305         return 0;
1306 }
1307
1308 static void qeth_set_single_write_queues(struct qeth_card *card)
1309 {
1310         if ((atomic_read(&card->qdio.state) != QETH_QDIO_UNINITIALIZED) &&
1311             (card->qdio.no_out_queues == 4))
1312                 qeth_free_qdio_buffers(card);
1313
1314         card->qdio.no_out_queues = 1;
1315         if (card->qdio.default_out_queue != 0)
1316                 dev_info(&card->gdev->dev, "Priority Queueing not supported\n");
1317
1318         card->qdio.default_out_queue = 0;
1319 }
1320
1321 static void qeth_set_multiple_write_queues(struct qeth_card *card)
1322 {
1323         if ((atomic_read(&card->qdio.state) != QETH_QDIO_UNINITIALIZED) &&
1324             (card->qdio.no_out_queues == 1)) {
1325                 qeth_free_qdio_buffers(card);
1326                 card->qdio.default_out_queue = 2;
1327         }
1328         card->qdio.no_out_queues = 4;
1329 }
1330
1331 static void qeth_update_from_chp_desc(struct qeth_card *card)
1332 {
1333         struct ccw_device *ccwdev;
1334         struct channel_path_desc_fmt0 *chp_dsc;
1335
1336         QETH_DBF_TEXT(SETUP, 2, "chp_desc");
1337
1338         ccwdev = card->data.ccwdev;
1339         chp_dsc = ccw_device_get_chp_desc(ccwdev, 0);
1340         if (!chp_dsc)
1341                 goto out;
1342
1343         card->info.func_level = 0x4100 + chp_dsc->desc;
1344         if (card->info.type == QETH_CARD_TYPE_IQD)
1345                 goto out;
1346
1347         /* CHPP field bit 6 == 1 -> single queue */
1348         if ((chp_dsc->chpp & 0x02) == 0x02)
1349                 qeth_set_single_write_queues(card);
1350         else
1351                 qeth_set_multiple_write_queues(card);
1352 out:
1353         kfree(chp_dsc);
1354         QETH_DBF_TEXT_(SETUP, 2, "nr:%x", card->qdio.no_out_queues);
1355         QETH_DBF_TEXT_(SETUP, 2, "lvl:%02x", card->info.func_level);
1356 }
1357
1358 static void qeth_init_qdio_info(struct qeth_card *card)
1359 {
1360         QETH_DBF_TEXT(SETUP, 4, "intqdinf");
1361         atomic_set(&card->qdio.state, QETH_QDIO_UNINITIALIZED);
1362         card->qdio.do_prio_queueing = QETH_PRIOQ_DEFAULT;
1363         card->qdio.default_out_queue = QETH_DEFAULT_QUEUE;
1364         card->qdio.no_out_queues = QETH_MAX_QUEUES;
1365
1366         /* inbound */
1367         card->qdio.no_in_queues = 1;
1368         card->qdio.in_buf_size = QETH_IN_BUF_SIZE_DEFAULT;
1369         if (card->info.type == QETH_CARD_TYPE_IQD)
1370                 card->qdio.init_pool.buf_count = QETH_IN_BUF_COUNT_HSDEFAULT;
1371         else
1372                 card->qdio.init_pool.buf_count = QETH_IN_BUF_COUNT_DEFAULT;
1373         card->qdio.in_buf_pool.buf_count = card->qdio.init_pool.buf_count;
1374         INIT_LIST_HEAD(&card->qdio.in_buf_pool.entry_list);
1375         INIT_LIST_HEAD(&card->qdio.init_pool.entry_list);
1376 }
1377
1378 static void qeth_set_initial_options(struct qeth_card *card)
1379 {
1380         card->options.route4.type = NO_ROUTER;
1381         card->options.route6.type = NO_ROUTER;
1382         card->options.rx_sg_cb = QETH_RX_SG_CB;
1383         card->options.isolation = ISOLATION_MODE_NONE;
1384         card->options.cq = QETH_CQ_DISABLED;
1385         card->options.layer = QETH_DISCIPLINE_UNDETERMINED;
1386 }
1387
1388 static int qeth_do_start_thread(struct qeth_card *card, unsigned long thread)
1389 {
1390         unsigned long flags;
1391         int rc = 0;
1392
1393         spin_lock_irqsave(&card->thread_mask_lock, flags);
1394         QETH_CARD_TEXT_(card, 4, "  %02x%02x%02x",
1395                         (u8) card->thread_start_mask,
1396                         (u8) card->thread_allowed_mask,
1397                         (u8) card->thread_running_mask);
1398         rc = (card->thread_start_mask & thread);
1399         spin_unlock_irqrestore(&card->thread_mask_lock, flags);
1400         return rc;
1401 }
1402
1403 static void qeth_start_kernel_thread(struct work_struct *work)
1404 {
1405         struct task_struct *ts;
1406         struct qeth_card *card = container_of(work, struct qeth_card,
1407                                         kernel_thread_starter);
1408         QETH_CARD_TEXT(card , 2, "strthrd");
1409
1410         if (card->read.state != CH_STATE_UP &&
1411             card->write.state != CH_STATE_UP)
1412                 return;
1413         if (qeth_do_start_thread(card, QETH_RECOVER_THREAD)) {
1414                 ts = kthread_run(card->discipline->recover, (void *)card,
1415                                 "qeth_recover");
1416                 if (IS_ERR(ts)) {
1417                         qeth_clear_thread_start_bit(card, QETH_RECOVER_THREAD);
1418                         qeth_clear_thread_running_bit(card,
1419                                 QETH_RECOVER_THREAD);
1420                 }
1421         }
1422 }
1423
1424 static void qeth_buffer_reclaim_work(struct work_struct *);
1425 static void qeth_setup_card(struct qeth_card *card)
1426 {
1427         QETH_DBF_TEXT(SETUP, 2, "setupcrd");
1428         QETH_DBF_HEX(SETUP, 2, &card, sizeof(void *));
1429
1430         card->info.type = CARD_RDEV(card)->id.driver_info;
1431         card->state = CARD_STATE_DOWN;
1432         spin_lock_init(&card->mclock);
1433         spin_lock_init(&card->lock);
1434         spin_lock_init(&card->ip_lock);
1435         spin_lock_init(&card->thread_mask_lock);
1436         mutex_init(&card->conf_mutex);
1437         mutex_init(&card->discipline_mutex);
1438         INIT_WORK(&card->kernel_thread_starter, qeth_start_kernel_thread);
1439         INIT_LIST_HEAD(&card->cmd_waiter_list);
1440         init_waitqueue_head(&card->wait_q);
1441         qeth_set_initial_options(card);
1442         /* IP address takeover */
1443         INIT_LIST_HEAD(&card->ipato.entries);
1444         qeth_init_qdio_info(card);
1445         INIT_DELAYED_WORK(&card->buffer_reclaim_work, qeth_buffer_reclaim_work);
1446         INIT_WORK(&card->close_dev_work, qeth_close_dev_handler);
1447 }
1448
1449 static void qeth_core_sl_print(struct seq_file *m, struct service_level *slr)
1450 {
1451         struct qeth_card *card = container_of(slr, struct qeth_card,
1452                                         qeth_service_level);
1453         if (card->info.mcl_level[0])
1454                 seq_printf(m, "qeth: %s firmware level %s\n",
1455                         CARD_BUS_ID(card), card->info.mcl_level);
1456 }
1457
1458 static struct qeth_card *qeth_alloc_card(struct ccwgroup_device *gdev)
1459 {
1460         struct qeth_card *card;
1461
1462         QETH_DBF_TEXT(SETUP, 2, "alloccrd");
1463         card = kzalloc(sizeof(*card), GFP_KERNEL);
1464         if (!card)
1465                 goto out;
1466         QETH_DBF_HEX(SETUP, 2, &card, sizeof(void *));
1467
1468         card->gdev = gdev;
1469         dev_set_drvdata(&gdev->dev, card);
1470         CARD_RDEV(card) = gdev->cdev[0];
1471         CARD_WDEV(card) = gdev->cdev[1];
1472         CARD_DDEV(card) = gdev->cdev[2];
1473
1474         card->event_wq = alloc_ordered_workqueue("%s", 0, dev_name(&gdev->dev));
1475         if (!card->event_wq)
1476                 goto out_wq;
1477         if (qeth_setup_channel(&card->read, true))
1478                 goto out_ip;
1479         if (qeth_setup_channel(&card->write, true))
1480                 goto out_channel;
1481         if (qeth_setup_channel(&card->data, false))
1482                 goto out_data;
1483         card->qeth_service_level.seq_print = qeth_core_sl_print;
1484         register_service_level(&card->qeth_service_level);
1485         return card;
1486
1487 out_data:
1488         qeth_clean_channel(&card->write);
1489 out_channel:
1490         qeth_clean_channel(&card->read);
1491 out_ip:
1492         destroy_workqueue(card->event_wq);
1493 out_wq:
1494         dev_set_drvdata(&gdev->dev, NULL);
1495         kfree(card);
1496 out:
1497         return NULL;
1498 }
1499
1500 static int qeth_clear_channel(struct qeth_card *card,
1501                               struct qeth_channel *channel)
1502 {
1503         int rc;
1504
1505         QETH_CARD_TEXT(card, 3, "clearch");
1506         spin_lock_irq(get_ccwdev_lock(channel->ccwdev));
1507         rc = ccw_device_clear(channel->ccwdev, QETH_CLEAR_CHANNEL_PARM);
1508         spin_unlock_irq(get_ccwdev_lock(channel->ccwdev));
1509
1510         if (rc)
1511                 return rc;
1512         rc = wait_event_interruptible_timeout(card->wait_q,
1513                         channel->state == CH_STATE_STOPPED, QETH_TIMEOUT);
1514         if (rc == -ERESTARTSYS)
1515                 return rc;
1516         if (channel->state != CH_STATE_STOPPED)
1517                 return -ETIME;
1518         channel->state = CH_STATE_DOWN;
1519         return 0;
1520 }
1521
1522 static int qeth_halt_channel(struct qeth_card *card,
1523                              struct qeth_channel *channel)
1524 {
1525         int rc;
1526
1527         QETH_CARD_TEXT(card, 3, "haltch");
1528         spin_lock_irq(get_ccwdev_lock(channel->ccwdev));
1529         rc = ccw_device_halt(channel->ccwdev, QETH_HALT_CHANNEL_PARM);
1530         spin_unlock_irq(get_ccwdev_lock(channel->ccwdev));
1531
1532         if (rc)
1533                 return rc;
1534         rc = wait_event_interruptible_timeout(card->wait_q,
1535                         channel->state == CH_STATE_HALTED, QETH_TIMEOUT);
1536         if (rc == -ERESTARTSYS)
1537                 return rc;
1538         if (channel->state != CH_STATE_HALTED)
1539                 return -ETIME;
1540         return 0;
1541 }
1542
1543 static int qeth_halt_channels(struct qeth_card *card)
1544 {
1545         int rc1 = 0, rc2 = 0, rc3 = 0;
1546
1547         QETH_CARD_TEXT(card, 3, "haltchs");
1548         rc1 = qeth_halt_channel(card, &card->read);
1549         rc2 = qeth_halt_channel(card, &card->write);
1550         rc3 = qeth_halt_channel(card, &card->data);
1551         if (rc1)
1552                 return rc1;
1553         if (rc2)
1554                 return rc2;
1555         return rc3;
1556 }
1557
1558 static int qeth_clear_channels(struct qeth_card *card)
1559 {
1560         int rc1 = 0, rc2 = 0, rc3 = 0;
1561
1562         QETH_CARD_TEXT(card, 3, "clearchs");
1563         rc1 = qeth_clear_channel(card, &card->read);
1564         rc2 = qeth_clear_channel(card, &card->write);
1565         rc3 = qeth_clear_channel(card, &card->data);
1566         if (rc1)
1567                 return rc1;
1568         if (rc2)
1569                 return rc2;
1570         return rc3;
1571 }
1572
1573 static int qeth_clear_halt_card(struct qeth_card *card, int halt)
1574 {
1575         int rc = 0;
1576
1577         QETH_CARD_TEXT(card, 3, "clhacrd");
1578
1579         if (halt)
1580                 rc = qeth_halt_channels(card);
1581         if (rc)
1582                 return rc;
1583         return qeth_clear_channels(card);
1584 }
1585
1586 int qeth_qdio_clear_card(struct qeth_card *card, int use_halt)
1587 {
1588         int rc = 0;
1589
1590         QETH_CARD_TEXT(card, 3, "qdioclr");
1591         switch (atomic_cmpxchg(&card->qdio.state, QETH_QDIO_ESTABLISHED,
1592                 QETH_QDIO_CLEANING)) {
1593         case QETH_QDIO_ESTABLISHED:
1594                 if (card->info.type == QETH_CARD_TYPE_IQD)
1595                         rc = qdio_shutdown(CARD_DDEV(card),
1596                                 QDIO_FLAG_CLEANUP_USING_HALT);
1597                 else
1598                         rc = qdio_shutdown(CARD_DDEV(card),
1599                                 QDIO_FLAG_CLEANUP_USING_CLEAR);
1600                 if (rc)
1601                         QETH_CARD_TEXT_(card, 3, "1err%d", rc);
1602                 atomic_set(&card->qdio.state, QETH_QDIO_ALLOCATED);
1603                 break;
1604         case QETH_QDIO_CLEANING:
1605                 return rc;
1606         default:
1607                 break;
1608         }
1609         rc = qeth_clear_halt_card(card, use_halt);
1610         if (rc)
1611                 QETH_CARD_TEXT_(card, 3, "2err%d", rc);
1612         card->state = CARD_STATE_DOWN;
1613         return rc;
1614 }
1615 EXPORT_SYMBOL_GPL(qeth_qdio_clear_card);
1616
1617 static int qeth_read_conf_data(struct qeth_card *card, void **buffer,
1618                                int *length)
1619 {
1620         struct ciw *ciw;
1621         char *rcd_buf;
1622         int ret;
1623         struct qeth_channel *channel = &card->data;
1624
1625         /*
1626          * scan for RCD command in extended SenseID data
1627          */
1628         ciw = ccw_device_get_ciw(channel->ccwdev, CIW_TYPE_RCD);
1629         if (!ciw || ciw->cmd == 0)
1630                 return -EOPNOTSUPP;
1631         rcd_buf = kzalloc(ciw->count, GFP_KERNEL | GFP_DMA);
1632         if (!rcd_buf)
1633                 return -ENOMEM;
1634
1635         qeth_setup_ccw(channel->ccw, ciw->cmd, ciw->count, rcd_buf);
1636         channel->state = CH_STATE_RCD;
1637         spin_lock_irq(get_ccwdev_lock(channel->ccwdev));
1638         ret = ccw_device_start_timeout(channel->ccwdev, channel->ccw,
1639                                        QETH_RCD_PARM, LPM_ANYPATH, 0,
1640                                        QETH_RCD_TIMEOUT);
1641         spin_unlock_irq(get_ccwdev_lock(channel->ccwdev));
1642         if (!ret)
1643                 wait_event(card->wait_q,
1644                            (channel->state == CH_STATE_RCD_DONE ||
1645                             channel->state == CH_STATE_DOWN));
1646         if (channel->state == CH_STATE_DOWN)
1647                 ret = -EIO;
1648         else
1649                 channel->state = CH_STATE_DOWN;
1650         if (ret) {
1651                 kfree(rcd_buf);
1652                 *buffer = NULL;
1653                 *length = 0;
1654         } else {
1655                 *length = ciw->count;
1656                 *buffer = rcd_buf;
1657         }
1658         return ret;
1659 }
1660
1661 static void qeth_configure_unitaddr(struct qeth_card *card, char *prcd)
1662 {
1663         QETH_DBF_TEXT(SETUP, 2, "cfgunit");
1664         card->info.chpid = prcd[30];
1665         card->info.unit_addr2 = prcd[31];
1666         card->info.cula = prcd[63];
1667         card->info.guestlan = ((prcd[0x10] == _ascebc['V']) &&
1668                                (prcd[0x11] == _ascebc['M']));
1669 }
1670
1671 static enum qeth_discipline_id qeth_vm_detect_layer(struct qeth_card *card)
1672 {
1673         enum qeth_discipline_id disc = QETH_DISCIPLINE_UNDETERMINED;
1674         struct diag26c_vnic_resp *response = NULL;
1675         struct diag26c_vnic_req *request = NULL;
1676         struct ccw_dev_id id;
1677         char userid[80];
1678         int rc = 0;
1679
1680         QETH_DBF_TEXT(SETUP, 2, "vmlayer");
1681
1682         cpcmd("QUERY USERID", userid, sizeof(userid), &rc);
1683         if (rc)
1684                 goto out;
1685
1686         request = kzalloc(sizeof(*request), GFP_KERNEL | GFP_DMA);
1687         response = kzalloc(sizeof(*response), GFP_KERNEL | GFP_DMA);
1688         if (!request || !response) {
1689                 rc = -ENOMEM;
1690                 goto out;
1691         }
1692
1693         ccw_device_get_id(CARD_RDEV(card), &id);
1694         request->resp_buf_len = sizeof(*response);
1695         request->resp_version = DIAG26C_VERSION6_VM65918;
1696         request->req_format = DIAG26C_VNIC_INFO;
1697         ASCEBC(userid, 8);
1698         memcpy(&request->sys_name, userid, 8);
1699         request->devno = id.devno;
1700
1701         QETH_DBF_HEX(CTRL, 2, request, sizeof(*request));
1702         rc = diag26c(request, response, DIAG26C_PORT_VNIC);
1703         QETH_DBF_HEX(CTRL, 2, request, sizeof(*request));
1704         if (rc)
1705                 goto out;
1706         QETH_DBF_HEX(CTRL, 2, response, sizeof(*response));
1707
1708         if (request->resp_buf_len < sizeof(*response) ||
1709             response->version != request->resp_version) {
1710                 rc = -EIO;
1711                 goto out;
1712         }
1713
1714         if (response->protocol == VNIC_INFO_PROT_L2)
1715                 disc = QETH_DISCIPLINE_LAYER2;
1716         else if (response->protocol == VNIC_INFO_PROT_L3)
1717                 disc = QETH_DISCIPLINE_LAYER3;
1718
1719 out:
1720         kfree(response);
1721         kfree(request);
1722         if (rc)
1723                 QETH_DBF_TEXT_(SETUP, 2, "err%x", rc);
1724         return disc;
1725 }
1726
1727 /* Determine whether the device requires a specific layer discipline */
1728 static enum qeth_discipline_id qeth_enforce_discipline(struct qeth_card *card)
1729 {
1730         enum qeth_discipline_id disc = QETH_DISCIPLINE_UNDETERMINED;
1731
1732         if (card->info.type == QETH_CARD_TYPE_OSM ||
1733             card->info.type == QETH_CARD_TYPE_OSN)
1734                 disc = QETH_DISCIPLINE_LAYER2;
1735         else if (card->info.guestlan)
1736                 disc = (card->info.type == QETH_CARD_TYPE_IQD) ?
1737                                 QETH_DISCIPLINE_LAYER3 :
1738                                 qeth_vm_detect_layer(card);
1739
1740         switch (disc) {
1741         case QETH_DISCIPLINE_LAYER2:
1742                 QETH_DBF_TEXT(SETUP, 3, "force l2");
1743                 break;
1744         case QETH_DISCIPLINE_LAYER3:
1745                 QETH_DBF_TEXT(SETUP, 3, "force l3");
1746                 break;
1747         default:
1748                 QETH_DBF_TEXT(SETUP, 3, "force no");
1749         }
1750
1751         return disc;
1752 }
1753
1754 static void qeth_configure_blkt_default(struct qeth_card *card, char *prcd)
1755 {
1756         QETH_DBF_TEXT(SETUP, 2, "cfgblkt");
1757
1758         if (prcd[74] == 0xF0 && prcd[75] == 0xF0 &&
1759             prcd[76] >= 0xF1 && prcd[76] <= 0xF4) {
1760                 card->info.blkt.time_total = 0;
1761                 card->info.blkt.inter_packet = 0;
1762                 card->info.blkt.inter_packet_jumbo = 0;
1763         } else {
1764                 card->info.blkt.time_total = 250;
1765                 card->info.blkt.inter_packet = 5;
1766                 card->info.blkt.inter_packet_jumbo = 15;
1767         }
1768 }
1769
1770 static void qeth_init_tokens(struct qeth_card *card)
1771 {
1772         card->token.issuer_rm_w = 0x00010103UL;
1773         card->token.cm_filter_w = 0x00010108UL;
1774         card->token.cm_connection_w = 0x0001010aUL;
1775         card->token.ulp_filter_w = 0x0001010bUL;
1776         card->token.ulp_connection_w = 0x0001010dUL;
1777 }
1778
1779 static void qeth_init_func_level(struct qeth_card *card)
1780 {
1781         switch (card->info.type) {
1782         case QETH_CARD_TYPE_IQD:
1783                 card->info.func_level = QETH_IDX_FUNC_LEVEL_IQD;
1784                 break;
1785         case QETH_CARD_TYPE_OSD:
1786         case QETH_CARD_TYPE_OSN:
1787                 card->info.func_level = QETH_IDX_FUNC_LEVEL_OSD;
1788                 break;
1789         default:
1790                 break;
1791         }
1792 }
1793
1794 static int qeth_idx_activate_get_answer(struct qeth_card *card,
1795                                         struct qeth_channel *channel,
1796                                         void (*reply_cb)(struct qeth_card *,
1797                                                          struct qeth_channel *,
1798                                                          struct qeth_cmd_buffer *))
1799 {
1800         struct qeth_cmd_buffer *iob;
1801         int rc;
1802
1803         QETH_DBF_TEXT(SETUP, 2, "idxanswr");
1804         iob = qeth_get_buffer(channel);
1805         if (!iob)
1806                 return -ENOMEM;
1807         iob->callback = reply_cb;
1808         qeth_setup_ccw(channel->ccw, CCW_CMD_READ, QETH_BUFSIZE, iob->data);
1809
1810         wait_event(card->wait_q,
1811                    atomic_cmpxchg(&channel->irq_pending, 0, 1) == 0);
1812         QETH_DBF_TEXT(SETUP, 6, "noirqpnd");
1813         spin_lock_irq(get_ccwdev_lock(channel->ccwdev));
1814         rc = ccw_device_start_timeout(channel->ccwdev, channel->ccw,
1815                                       (addr_t) iob, 0, 0, QETH_TIMEOUT);
1816         spin_unlock_irq(get_ccwdev_lock(channel->ccwdev));
1817
1818         if (rc) {
1819                 QETH_DBF_MESSAGE(2, "Error2 in activating channel rc=%d\n", rc);
1820                 QETH_DBF_TEXT_(SETUP, 2, "2err%d", rc);
1821                 atomic_set(&channel->irq_pending, 0);
1822                 qeth_release_buffer(channel, iob);
1823                 wake_up(&card->wait_q);
1824                 return rc;
1825         }
1826         rc = wait_event_interruptible_timeout(card->wait_q,
1827                          channel->state == CH_STATE_UP, QETH_TIMEOUT);
1828         if (rc == -ERESTARTSYS)
1829                 return rc;
1830         if (channel->state != CH_STATE_UP) {
1831                 rc = -ETIME;
1832                 QETH_DBF_TEXT_(SETUP, 2, "3err%d", rc);
1833         } else
1834                 rc = 0;
1835         return rc;
1836 }
1837
1838 static int qeth_idx_activate_channel(struct qeth_card *card,
1839                                      struct qeth_channel *channel,
1840                                      void (*reply_cb)(struct qeth_card *,
1841                                                       struct qeth_channel *,
1842                                                       struct qeth_cmd_buffer *))
1843 {
1844         struct qeth_cmd_buffer *iob;
1845         __u16 temp;
1846         __u8 tmp;
1847         int rc;
1848         struct ccw_dev_id temp_devid;
1849
1850         QETH_DBF_TEXT(SETUP, 2, "idxactch");
1851
1852         iob = qeth_get_buffer(channel);
1853         if (!iob)
1854                 return -ENOMEM;
1855         iob->callback = reply_cb;
1856         qeth_setup_ccw(channel->ccw, CCW_CMD_WRITE, IDX_ACTIVATE_SIZE,
1857                        iob->data);
1858         if (channel == &card->write) {
1859                 memcpy(iob->data, IDX_ACTIVATE_WRITE, IDX_ACTIVATE_SIZE);
1860                 memcpy(QETH_TRANSPORT_HEADER_SEQ_NO(iob->data),
1861                        &card->seqno.trans_hdr, QETH_SEQ_NO_LENGTH);
1862                 card->seqno.trans_hdr++;
1863         } else {
1864                 memcpy(iob->data, IDX_ACTIVATE_READ, IDX_ACTIVATE_SIZE);
1865                 memcpy(QETH_TRANSPORT_HEADER_SEQ_NO(iob->data),
1866                        &card->seqno.trans_hdr, QETH_SEQ_NO_LENGTH);
1867         }
1868         tmp = ((u8)card->dev->dev_port) | 0x80;
1869         memcpy(QETH_IDX_ACT_PNO(iob->data), &tmp, 1);
1870         memcpy(QETH_IDX_ACT_ISSUER_RM_TOKEN(iob->data),
1871                &card->token.issuer_rm_w, QETH_MPC_TOKEN_LENGTH);
1872         memcpy(QETH_IDX_ACT_FUNC_LEVEL(iob->data),
1873                &card->info.func_level, sizeof(__u16));
1874         ccw_device_get_id(CARD_DDEV(card), &temp_devid);
1875         memcpy(QETH_IDX_ACT_QDIO_DEV_CUA(iob->data), &temp_devid.devno, 2);
1876         temp = (card->info.cula << 8) + card->info.unit_addr2;
1877         memcpy(QETH_IDX_ACT_QDIO_DEV_REALADDR(iob->data), &temp, 2);
1878
1879         wait_event(card->wait_q,
1880                    atomic_cmpxchg(&channel->irq_pending, 0, 1) == 0);
1881         QETH_DBF_TEXT(SETUP, 6, "noirqpnd");
1882         spin_lock_irq(get_ccwdev_lock(channel->ccwdev));
1883         rc = ccw_device_start_timeout(channel->ccwdev, channel->ccw,
1884                                       (addr_t) iob, 0, 0, QETH_TIMEOUT);
1885         spin_unlock_irq(get_ccwdev_lock(channel->ccwdev));
1886
1887         if (rc) {
1888                 QETH_DBF_MESSAGE(2, "Error1 in activating channel. rc=%d\n",
1889                         rc);
1890                 QETH_DBF_TEXT_(SETUP, 2, "1err%d", rc);
1891                 atomic_set(&channel->irq_pending, 0);
1892                 qeth_release_buffer(channel, iob);
1893                 wake_up(&card->wait_q);
1894                 return rc;
1895         }
1896         rc = wait_event_interruptible_timeout(card->wait_q,
1897                         channel->state == CH_STATE_ACTIVATING, QETH_TIMEOUT);
1898         if (rc == -ERESTARTSYS)
1899                 return rc;
1900         if (channel->state != CH_STATE_ACTIVATING) {
1901                 dev_warn(&channel->ccwdev->dev, "The qeth device driver"
1902                         " failed to recover an error on the device\n");
1903                 QETH_DBF_MESSAGE(2, "IDX activate timed out on channel %x\n",
1904                                  CCW_DEVID(channel->ccwdev));
1905                 QETH_DBF_TEXT_(SETUP, 2, "2err%d", -ETIME);
1906                 return -ETIME;
1907         }
1908         return qeth_idx_activate_get_answer(card, channel, reply_cb);
1909 }
1910
1911 static int qeth_peer_func_level(int level)
1912 {
1913         if ((level & 0xff) == 8)
1914                 return (level & 0xff) + 0x400;
1915         if (((level >> 8) & 3) == 1)
1916                 return (level & 0xff) + 0x200;
1917         return level;
1918 }
1919
1920 static void qeth_idx_write_cb(struct qeth_card *card,
1921                               struct qeth_channel *channel,
1922                               struct qeth_cmd_buffer *iob)
1923 {
1924         __u16 temp;
1925
1926         QETH_DBF_TEXT(SETUP , 2, "idxwrcb");
1927
1928         if (channel->state == CH_STATE_DOWN) {
1929                 channel->state = CH_STATE_ACTIVATING;
1930                 goto out;
1931         }
1932
1933         if (!(QETH_IS_IDX_ACT_POS_REPLY(iob->data))) {
1934                 if (QETH_IDX_ACT_CAUSE_CODE(iob->data) == QETH_IDX_ACT_ERR_EXCL)
1935                         dev_err(&channel->ccwdev->dev,
1936                                 "The adapter is used exclusively by another "
1937                                 "host\n");
1938                 else
1939                         QETH_DBF_MESSAGE(2, "IDX_ACTIVATE on channel %x: negative reply\n",
1940                                          CCW_DEVID(channel->ccwdev));
1941                 goto out;
1942         }
1943         memcpy(&temp, QETH_IDX_ACT_FUNC_LEVEL(iob->data), 2);
1944         if ((temp & ~0x0100) != qeth_peer_func_level(card->info.func_level)) {
1945                 QETH_DBF_MESSAGE(2, "IDX_ACTIVATE on channel %x: function level mismatch (sent: %#x, received: %#x)\n",
1946                                  CCW_DEVID(channel->ccwdev),
1947                                  card->info.func_level, temp);
1948                 goto out;
1949         }
1950         channel->state = CH_STATE_UP;
1951 out:
1952         qeth_release_buffer(channel, iob);
1953 }
1954
1955 static void qeth_idx_read_cb(struct qeth_card *card,
1956                              struct qeth_channel *channel,
1957                              struct qeth_cmd_buffer *iob)
1958 {
1959         __u16 temp;
1960
1961         QETH_DBF_TEXT(SETUP , 2, "idxrdcb");
1962         if (channel->state == CH_STATE_DOWN) {
1963                 channel->state = CH_STATE_ACTIVATING;
1964                 goto out;
1965         }
1966
1967         if (qeth_check_idx_response(card, iob->data))
1968                         goto out;
1969
1970         if (!(QETH_IS_IDX_ACT_POS_REPLY(iob->data))) {
1971                 switch (QETH_IDX_ACT_CAUSE_CODE(iob->data)) {
1972                 case QETH_IDX_ACT_ERR_EXCL:
1973                         dev_err(&channel->ccwdev->dev,
1974                                 "The adapter is used exclusively by another "
1975                                 "host\n");
1976                         break;
1977                 case QETH_IDX_ACT_ERR_AUTH:
1978                 case QETH_IDX_ACT_ERR_AUTH_USER:
1979                         dev_err(&channel->ccwdev->dev,
1980                                 "Setting the device online failed because of "
1981                                 "insufficient authorization\n");
1982                         break;
1983                 default:
1984                         QETH_DBF_MESSAGE(2, "IDX_ACTIVATE on channel %x: negative reply\n",
1985                                          CCW_DEVID(channel->ccwdev));
1986                 }
1987                 QETH_CARD_TEXT_(card, 2, "idxread%c",
1988                         QETH_IDX_ACT_CAUSE_CODE(iob->data));
1989                 goto out;
1990         }
1991
1992         memcpy(&temp, QETH_IDX_ACT_FUNC_LEVEL(iob->data), 2);
1993         if (temp != qeth_peer_func_level(card->info.func_level)) {
1994                 QETH_DBF_MESSAGE(2, "IDX_ACTIVATE on channel %x: function level mismatch (sent: %#x, received: %#x)\n",
1995                                  CCW_DEVID(channel->ccwdev),
1996                                  card->info.func_level, temp);
1997                 goto out;
1998         }
1999         memcpy(&card->token.issuer_rm_r,
2000                QETH_IDX_ACT_ISSUER_RM_TOKEN(iob->data),
2001                QETH_MPC_TOKEN_LENGTH);
2002         memcpy(&card->info.mcl_level[0],
2003                QETH_IDX_REPLY_LEVEL(iob->data), QETH_MCL_LENGTH);
2004         channel->state = CH_STATE_UP;
2005 out:
2006         qeth_release_buffer(channel, iob);
2007 }
2008
2009 void qeth_prepare_control_data(struct qeth_card *card, int len,
2010                 struct qeth_cmd_buffer *iob)
2011 {
2012         qeth_setup_ccw(iob->channel->ccw, CCW_CMD_WRITE, len, iob->data);
2013         iob->callback = qeth_release_buffer_cb;
2014
2015         memcpy(QETH_TRANSPORT_HEADER_SEQ_NO(iob->data),
2016                &card->seqno.trans_hdr, QETH_SEQ_NO_LENGTH);
2017         card->seqno.trans_hdr++;
2018         memcpy(QETH_PDU_HEADER_SEQ_NO(iob->data),
2019                &card->seqno.pdu_hdr, QETH_SEQ_NO_LENGTH);
2020         card->seqno.pdu_hdr++;
2021         memcpy(QETH_PDU_HEADER_ACK_SEQ_NO(iob->data),
2022                &card->seqno.pdu_hdr_ack, QETH_SEQ_NO_LENGTH);
2023         QETH_DBF_HEX(CTRL, 2, iob->data, min(len, QETH_DBF_CTRL_LEN));
2024 }
2025 EXPORT_SYMBOL_GPL(qeth_prepare_control_data);
2026
2027 /**
2028  * qeth_send_control_data() -   send control command to the card
2029  * @card:                       qeth_card structure pointer
2030  * @len:                        size of the command buffer
2031  * @iob:                        qeth_cmd_buffer pointer
2032  * @reply_cb:                   callback function pointer
2033  * @cb_card:                    pointer to the qeth_card structure
2034  * @cb_reply:                   pointer to the qeth_reply structure
2035  * @cb_cmd:                     pointer to the original iob for non-IPA
2036  *                              commands, or to the qeth_ipa_cmd structure
2037  *                              for the IPA commands.
2038  * @reply_param:                private pointer passed to the callback
2039  *
2040  * Returns the value of the `return_code' field of the response
2041  * block returned from the hardware, or other error indication.
2042  * Value of zero indicates successful execution of the command.
2043  *
2044  * Callback function gets called one or more times, with cb_cmd
2045  * pointing to the response returned by the hardware. Callback
2046  * function must return non-zero if more reply blocks are expected,
2047  * and zero if the last or only reply block is received. Callback
2048  * function can get the value of the reply_param pointer from the
2049  * field 'param' of the structure qeth_reply.
2050  */
2051
2052 static int qeth_send_control_data(struct qeth_card *card, int len,
2053                                   struct qeth_cmd_buffer *iob,
2054                                   int (*reply_cb)(struct qeth_card *cb_card,
2055                                                   struct qeth_reply *cb_reply,
2056                                                   unsigned long cb_cmd),
2057                                   void *reply_param)
2058 {
2059         struct qeth_channel *channel = iob->channel;
2060         int rc;
2061         struct qeth_reply *reply = NULL;
2062         unsigned long timeout, event_timeout;
2063         struct qeth_ipa_cmd *cmd = NULL;
2064
2065         QETH_CARD_TEXT(card, 2, "sendctl");
2066
2067         if (card->read_or_write_problem) {
2068                 qeth_release_buffer(channel, iob);
2069                 return -EIO;
2070         }
2071         reply = qeth_alloc_reply(card);
2072         if (!reply) {
2073                 qeth_release_buffer(channel, iob);
2074                 return -ENOMEM;
2075         }
2076         reply->callback = reply_cb;
2077         reply->param = reply_param;
2078
2079         /* pairs with qeth_release_buffer(): */
2080         qeth_get_reply(reply);
2081         iob->reply = reply;
2082
2083         while (atomic_cmpxchg(&channel->irq_pending, 0, 1)) ;
2084
2085         if (IS_IPA(iob->data)) {
2086                 cmd = __ipa_cmd(iob);
2087                 cmd->hdr.seqno = card->seqno.ipa++;
2088                 reply->seqno = cmd->hdr.seqno;
2089                 event_timeout = QETH_IPA_TIMEOUT;
2090         } else {
2091                 reply->seqno = QETH_IDX_COMMAND_SEQNO;
2092                 event_timeout = QETH_TIMEOUT;
2093         }
2094         qeth_prepare_control_data(card, len, iob);
2095
2096         qeth_enqueue_reply(card, reply);
2097
2098         timeout = jiffies + event_timeout;
2099
2100         QETH_CARD_TEXT(card, 6, "noirqpnd");
2101         spin_lock_irq(get_ccwdev_lock(channel->ccwdev));
2102         rc = ccw_device_start_timeout(channel->ccwdev, channel->ccw,
2103                                       (addr_t) iob, 0, 0, event_timeout);
2104         spin_unlock_irq(get_ccwdev_lock(channel->ccwdev));
2105         if (rc) {
2106                 QETH_DBF_MESSAGE(2, "qeth_send_control_data on device %x: ccw_device_start rc = %i\n",
2107                                  CARD_DEVID(card), rc);
2108                 QETH_CARD_TEXT_(card, 2, " err%d", rc);
2109                 qeth_dequeue_reply(card, reply);
2110                 qeth_put_reply(reply);
2111                 qeth_release_buffer(channel, iob);
2112                 atomic_set(&channel->irq_pending, 0);
2113                 wake_up(&card->wait_q);
2114                 return rc;
2115         }
2116
2117         /* we have only one long running ipassist, since we can ensure
2118            process context of this command we can sleep */
2119         if (cmd && cmd->hdr.command == IPA_CMD_SETIP &&
2120             cmd->hdr.prot_version == QETH_PROT_IPV4) {
2121                 if (!wait_event_timeout(reply->wait_q,
2122                     atomic_read(&reply->received), event_timeout))
2123                         goto time_err;
2124         } else {
2125                 while (!atomic_read(&reply->received)) {
2126                         if (time_after(jiffies, timeout))
2127                                 goto time_err;
2128                         cpu_relax();
2129                 }
2130         }
2131
2132         qeth_dequeue_reply(card, reply);
2133         rc = reply->rc;
2134         qeth_put_reply(reply);
2135         return rc;
2136
2137 time_err:
2138         qeth_dequeue_reply(card, reply);
2139         qeth_put_reply(reply);
2140         return -ETIME;
2141 }
2142
2143 static int qeth_cm_enable_cb(struct qeth_card *card, struct qeth_reply *reply,
2144                 unsigned long data)
2145 {
2146         struct qeth_cmd_buffer *iob;
2147
2148         QETH_DBF_TEXT(SETUP, 2, "cmenblcb");
2149
2150         iob = (struct qeth_cmd_buffer *) data;
2151         memcpy(&card->token.cm_filter_r,
2152                QETH_CM_ENABLE_RESP_FILTER_TOKEN(iob->data),
2153                QETH_MPC_TOKEN_LENGTH);
2154         return 0;
2155 }
2156
2157 static int qeth_cm_enable(struct qeth_card *card)
2158 {
2159         int rc;
2160         struct qeth_cmd_buffer *iob;
2161
2162         QETH_DBF_TEXT(SETUP, 2, "cmenable");
2163
2164         iob = qeth_wait_for_buffer(&card->write);
2165         memcpy(iob->data, CM_ENABLE, CM_ENABLE_SIZE);
2166         memcpy(QETH_CM_ENABLE_ISSUER_RM_TOKEN(iob->data),
2167                &card->token.issuer_rm_r, QETH_MPC_TOKEN_LENGTH);
2168         memcpy(QETH_CM_ENABLE_FILTER_TOKEN(iob->data),
2169                &card->token.cm_filter_w, QETH_MPC_TOKEN_LENGTH);
2170
2171         rc = qeth_send_control_data(card, CM_ENABLE_SIZE, iob,
2172                                     qeth_cm_enable_cb, NULL);
2173         return rc;
2174 }
2175
2176 static int qeth_cm_setup_cb(struct qeth_card *card, struct qeth_reply *reply,
2177                 unsigned long data)
2178 {
2179         struct qeth_cmd_buffer *iob;
2180
2181         QETH_DBF_TEXT(SETUP, 2, "cmsetpcb");
2182
2183         iob = (struct qeth_cmd_buffer *) data;
2184         memcpy(&card->token.cm_connection_r,
2185                QETH_CM_SETUP_RESP_DEST_ADDR(iob->data),
2186                QETH_MPC_TOKEN_LENGTH);
2187         return 0;
2188 }
2189
2190 static int qeth_cm_setup(struct qeth_card *card)
2191 {
2192         int rc;
2193         struct qeth_cmd_buffer *iob;
2194
2195         QETH_DBF_TEXT(SETUP, 2, "cmsetup");
2196
2197         iob = qeth_wait_for_buffer(&card->write);
2198         memcpy(iob->data, CM_SETUP, CM_SETUP_SIZE);
2199         memcpy(QETH_CM_SETUP_DEST_ADDR(iob->data),
2200                &card->token.issuer_rm_r, QETH_MPC_TOKEN_LENGTH);
2201         memcpy(QETH_CM_SETUP_CONNECTION_TOKEN(iob->data),
2202                &card->token.cm_connection_w, QETH_MPC_TOKEN_LENGTH);
2203         memcpy(QETH_CM_SETUP_FILTER_TOKEN(iob->data),
2204                &card->token.cm_filter_r, QETH_MPC_TOKEN_LENGTH);
2205         rc = qeth_send_control_data(card, CM_SETUP_SIZE, iob,
2206                                     qeth_cm_setup_cb, NULL);
2207         return rc;
2208 }
2209
2210 static int qeth_update_max_mtu(struct qeth_card *card, unsigned int max_mtu)
2211 {
2212         struct net_device *dev = card->dev;
2213         unsigned int new_mtu;
2214
2215         if (!max_mtu) {
2216                 /* IQD needs accurate max MTU to set up its RX buffers: */
2217                 if (IS_IQD(card))
2218                         return -EINVAL;
2219                 /* tolerate quirky HW: */
2220                 max_mtu = ETH_MAX_MTU;
2221         }
2222
2223         rtnl_lock();
2224         if (IS_IQD(card)) {
2225                 /* move any device with default MTU to new max MTU: */
2226                 new_mtu = (dev->mtu == dev->max_mtu) ? max_mtu : dev->mtu;
2227
2228                 /* adjust RX buffer size to new max MTU: */
2229                 card->qdio.in_buf_size = max_mtu + 2 * PAGE_SIZE;
2230                 if (dev->max_mtu && dev->max_mtu != max_mtu)
2231                         qeth_free_qdio_buffers(card);
2232         } else {
2233                 if (dev->mtu)
2234                         new_mtu = dev->mtu;
2235                 /* default MTUs for first setup: */
2236                 else if (IS_LAYER2(card))
2237                         new_mtu = ETH_DATA_LEN;
2238                 else
2239                         new_mtu = ETH_DATA_LEN - 8; /* allow for LLC + SNAP */
2240         }
2241
2242         dev->max_mtu = max_mtu;
2243         dev->mtu = min(new_mtu, max_mtu);
2244         rtnl_unlock();
2245         return 0;
2246 }
2247
2248 static int qeth_get_mtu_outof_framesize(int framesize)
2249 {
2250         switch (framesize) {
2251         case 0x4000:
2252                 return 8192;
2253         case 0x6000:
2254                 return 16384;
2255         case 0xa000:
2256                 return 32768;
2257         case 0xffff:
2258                 return 57344;
2259         default:
2260                 return 0;
2261         }
2262 }
2263
2264 static int qeth_ulp_enable_cb(struct qeth_card *card, struct qeth_reply *reply,
2265                 unsigned long data)
2266 {
2267         __u16 mtu, framesize;
2268         __u16 len;
2269         __u8 link_type;
2270         struct qeth_cmd_buffer *iob;
2271
2272         QETH_DBF_TEXT(SETUP, 2, "ulpenacb");
2273
2274         iob = (struct qeth_cmd_buffer *) data;
2275         memcpy(&card->token.ulp_filter_r,
2276                QETH_ULP_ENABLE_RESP_FILTER_TOKEN(iob->data),
2277                QETH_MPC_TOKEN_LENGTH);
2278         if (card->info.type == QETH_CARD_TYPE_IQD) {
2279                 memcpy(&framesize, QETH_ULP_ENABLE_RESP_MAX_MTU(iob->data), 2);
2280                 mtu = qeth_get_mtu_outof_framesize(framesize);
2281         } else {
2282                 mtu = *(__u16 *)QETH_ULP_ENABLE_RESP_MAX_MTU(iob->data);
2283         }
2284         *(u16 *)reply->param = mtu;
2285
2286         memcpy(&len, QETH_ULP_ENABLE_RESP_DIFINFO_LEN(iob->data), 2);
2287         if (len >= QETH_MPC_DIFINFO_LEN_INDICATES_LINK_TYPE) {
2288                 memcpy(&link_type,
2289                        QETH_ULP_ENABLE_RESP_LINK_TYPE(iob->data), 1);
2290                 card->info.link_type = link_type;
2291         } else
2292                 card->info.link_type = 0;
2293         QETH_DBF_TEXT_(SETUP, 2, "link%d", card->info.link_type);
2294         return 0;
2295 }
2296
2297 static u8 qeth_mpc_select_prot_type(struct qeth_card *card)
2298 {
2299         if (IS_OSN(card))
2300                 return QETH_PROT_OSN2;
2301         return IS_LAYER2(card) ? QETH_PROT_LAYER2 : QETH_PROT_TCPIP;
2302 }
2303
2304 static int qeth_ulp_enable(struct qeth_card *card)
2305 {
2306         u8 prot_type = qeth_mpc_select_prot_type(card);
2307         struct qeth_cmd_buffer *iob;
2308         u16 max_mtu;
2309         int rc;
2310
2311         /*FIXME: trace view callbacks*/
2312         QETH_DBF_TEXT(SETUP, 2, "ulpenabl");
2313
2314         iob = qeth_wait_for_buffer(&card->write);
2315         memcpy(iob->data, ULP_ENABLE, ULP_ENABLE_SIZE);
2316
2317         *(QETH_ULP_ENABLE_LINKNUM(iob->data)) = (u8) card->dev->dev_port;
2318         memcpy(QETH_ULP_ENABLE_PROT_TYPE(iob->data), &prot_type, 1);
2319         memcpy(QETH_ULP_ENABLE_DEST_ADDR(iob->data),
2320                &card->token.cm_connection_r, QETH_MPC_TOKEN_LENGTH);
2321         memcpy(QETH_ULP_ENABLE_FILTER_TOKEN(iob->data),
2322                &card->token.ulp_filter_w, QETH_MPC_TOKEN_LENGTH);
2323         rc = qeth_send_control_data(card, ULP_ENABLE_SIZE, iob,
2324                                     qeth_ulp_enable_cb, &max_mtu);
2325         if (rc)
2326                 return rc;
2327         return qeth_update_max_mtu(card, max_mtu);
2328 }
2329
2330 static int qeth_ulp_setup_cb(struct qeth_card *card, struct qeth_reply *reply,
2331                 unsigned long data)
2332 {
2333         struct qeth_cmd_buffer *iob;
2334
2335         QETH_DBF_TEXT(SETUP, 2, "ulpstpcb");
2336
2337         iob = (struct qeth_cmd_buffer *) data;
2338         memcpy(&card->token.ulp_connection_r,
2339                QETH_ULP_SETUP_RESP_CONNECTION_TOKEN(iob->data),
2340                QETH_MPC_TOKEN_LENGTH);
2341         if (!strncmp("00S", QETH_ULP_SETUP_RESP_CONNECTION_TOKEN(iob->data),
2342                      3)) {
2343                 QETH_DBF_TEXT(SETUP, 2, "olmlimit");
2344                 dev_err(&card->gdev->dev, "A connection could not be "
2345                         "established because of an OLM limit\n");
2346                 iob->rc = -EMLINK;
2347         }
2348         QETH_DBF_TEXT_(SETUP, 2, "  rc%d", iob->rc);
2349         return 0;
2350 }
2351
2352 static int qeth_ulp_setup(struct qeth_card *card)
2353 {
2354         int rc;
2355         __u16 temp;
2356         struct qeth_cmd_buffer *iob;
2357         struct ccw_dev_id dev_id;
2358
2359         QETH_DBF_TEXT(SETUP, 2, "ulpsetup");
2360
2361         iob = qeth_wait_for_buffer(&card->write);
2362         memcpy(iob->data, ULP_SETUP, ULP_SETUP_SIZE);
2363
2364         memcpy(QETH_ULP_SETUP_DEST_ADDR(iob->data),
2365                &card->token.cm_connection_r, QETH_MPC_TOKEN_LENGTH);
2366         memcpy(QETH_ULP_SETUP_CONNECTION_TOKEN(iob->data),
2367                &card->token.ulp_connection_w, QETH_MPC_TOKEN_LENGTH);
2368         memcpy(QETH_ULP_SETUP_FILTER_TOKEN(iob->data),
2369                &card->token.ulp_filter_r, QETH_MPC_TOKEN_LENGTH);
2370
2371         ccw_device_get_id(CARD_DDEV(card), &dev_id);
2372         memcpy(QETH_ULP_SETUP_CUA(iob->data), &dev_id.devno, 2);
2373         temp = (card->info.cula << 8) + card->info.unit_addr2;
2374         memcpy(QETH_ULP_SETUP_REAL_DEVADDR(iob->data), &temp, 2);
2375         rc = qeth_send_control_data(card, ULP_SETUP_SIZE, iob,
2376                                     qeth_ulp_setup_cb, NULL);
2377         return rc;
2378 }
2379
2380 static int qeth_init_qdio_out_buf(struct qeth_qdio_out_q *q, int bidx)
2381 {
2382         struct qeth_qdio_out_buffer *newbuf;
2383
2384         newbuf = kmem_cache_zalloc(qeth_qdio_outbuf_cache, GFP_ATOMIC);
2385         if (!newbuf)
2386                 return -ENOMEM;
2387
2388         newbuf->buffer = q->qdio_bufs[bidx];
2389         skb_queue_head_init(&newbuf->skb_list);
2390         lockdep_set_class(&newbuf->skb_list.lock, &qdio_out_skb_queue_key);
2391         newbuf->q = q;
2392         newbuf->next_pending = q->bufs[bidx];
2393         atomic_set(&newbuf->state, QETH_QDIO_BUF_EMPTY);
2394         q->bufs[bidx] = newbuf;
2395         return 0;
2396 }
2397
2398 static void qeth_free_output_queue(struct qeth_qdio_out_q *q)
2399 {
2400         if (!q)
2401                 return;
2402
2403         qeth_clear_outq_buffers(q, 1);
2404         qdio_free_buffers(q->qdio_bufs, QDIO_MAX_BUFFERS_PER_Q);
2405         kfree(q);
2406 }
2407
2408 static struct qeth_qdio_out_q *qeth_alloc_qdio_out_buf(void)
2409 {
2410         struct qeth_qdio_out_q *q = kzalloc(sizeof(*q), GFP_KERNEL);
2411
2412         if (!q)
2413                 return NULL;
2414
2415         if (qdio_alloc_buffers(q->qdio_bufs, QDIO_MAX_BUFFERS_PER_Q)) {
2416                 kfree(q);
2417                 return NULL;
2418         }
2419         return q;
2420 }
2421
2422 static int qeth_alloc_qdio_buffers(struct qeth_card *card)
2423 {
2424         int i, j;
2425
2426         QETH_DBF_TEXT(SETUP, 2, "allcqdbf");
2427
2428         if (atomic_cmpxchg(&card->qdio.state, QETH_QDIO_UNINITIALIZED,
2429                 QETH_QDIO_ALLOCATED) != QETH_QDIO_UNINITIALIZED)
2430                 return 0;
2431
2432         QETH_DBF_TEXT(SETUP, 2, "inq");
2433         card->qdio.in_q = qeth_alloc_qdio_queue();
2434         if (!card->qdio.in_q)
2435                 goto out_nomem;
2436
2437         /* inbound buffer pool */
2438         if (qeth_alloc_buffer_pool(card))
2439                 goto out_freeinq;
2440
2441         /* outbound */
2442         card->qdio.out_qs =
2443                 kcalloc(card->qdio.no_out_queues,
2444                         sizeof(struct qeth_qdio_out_q *),
2445                         GFP_KERNEL);
2446         if (!card->qdio.out_qs)
2447                 goto out_freepool;
2448         for (i = 0; i < card->qdio.no_out_queues; ++i) {
2449                 card->qdio.out_qs[i] = qeth_alloc_qdio_out_buf();
2450                 if (!card->qdio.out_qs[i])
2451                         goto out_freeoutq;
2452                 QETH_DBF_TEXT_(SETUP, 2, "outq %i", i);
2453                 QETH_DBF_HEX(SETUP, 2, &card->qdio.out_qs[i], sizeof(void *));
2454                 card->qdio.out_qs[i]->queue_no = i;
2455                 /* give outbound qeth_qdio_buffers their qdio_buffers */
2456                 for (j = 0; j < QDIO_MAX_BUFFERS_PER_Q; ++j) {
2457                         WARN_ON(card->qdio.out_qs[i]->bufs[j] != NULL);
2458                         if (qeth_init_qdio_out_buf(card->qdio.out_qs[i], j))
2459                                 goto out_freeoutqbufs;
2460                 }
2461         }
2462
2463         /* completion */
2464         if (qeth_alloc_cq(card))
2465                 goto out_freeoutq;
2466
2467         return 0;
2468
2469 out_freeoutqbufs:
2470         while (j > 0) {
2471                 --j;
2472                 kmem_cache_free(qeth_qdio_outbuf_cache,
2473                                 card->qdio.out_qs[i]->bufs[j]);
2474                 card->qdio.out_qs[i]->bufs[j] = NULL;
2475         }
2476 out_freeoutq:
2477         while (i > 0)
2478                 qeth_free_output_queue(card->qdio.out_qs[--i]);
2479         kfree(card->qdio.out_qs);
2480         card->qdio.out_qs = NULL;
2481 out_freepool:
2482         qeth_free_buffer_pool(card);
2483 out_freeinq:
2484         qeth_free_qdio_queue(card->qdio.in_q);
2485         card->qdio.in_q = NULL;
2486 out_nomem:
2487         atomic_set(&card->qdio.state, QETH_QDIO_UNINITIALIZED);
2488         return -ENOMEM;
2489 }
2490
2491 static void qeth_free_qdio_buffers(struct qeth_card *card)
2492 {
2493         int i, j;
2494
2495         if (atomic_xchg(&card->qdio.state, QETH_QDIO_UNINITIALIZED) ==
2496                 QETH_QDIO_UNINITIALIZED)
2497                 return;
2498
2499         qeth_free_cq(card);
2500         cancel_delayed_work_sync(&card->buffer_reclaim_work);
2501         for (j = 0; j < QDIO_MAX_BUFFERS_PER_Q; ++j) {
2502                 if (card->qdio.in_q->bufs[j].rx_skb)
2503                         dev_kfree_skb_any(card->qdio.in_q->bufs[j].rx_skb);
2504         }
2505         qeth_free_qdio_queue(card->qdio.in_q);
2506         card->qdio.in_q = NULL;
2507         /* inbound buffer pool */
2508         qeth_free_buffer_pool(card);
2509         /* free outbound qdio_qs */
2510         if (card->qdio.out_qs) {
2511                 for (i = 0; i < card->qdio.no_out_queues; i++)
2512                         qeth_free_output_queue(card->qdio.out_qs[i]);
2513                 kfree(card->qdio.out_qs);
2514                 card->qdio.out_qs = NULL;
2515         }
2516 }
2517
2518 static void qeth_create_qib_param_field(struct qeth_card *card,
2519                 char *param_field)
2520 {
2521
2522         param_field[0] = _ascebc['P'];
2523         param_field[1] = _ascebc['C'];
2524         param_field[2] = _ascebc['I'];
2525         param_field[3] = _ascebc['T'];
2526         *((unsigned int *) (&param_field[4])) = QETH_PCI_THRESHOLD_A(card);
2527         *((unsigned int *) (&param_field[8])) = QETH_PCI_THRESHOLD_B(card);
2528         *((unsigned int *) (&param_field[12])) = QETH_PCI_TIMER_VALUE(card);
2529 }
2530
2531 static void qeth_create_qib_param_field_blkt(struct qeth_card *card,
2532                 char *param_field)
2533 {
2534         param_field[16] = _ascebc['B'];
2535         param_field[17] = _ascebc['L'];
2536         param_field[18] = _ascebc['K'];
2537         param_field[19] = _ascebc['T'];
2538         *((unsigned int *) (&param_field[20])) = card->info.blkt.time_total;
2539         *((unsigned int *) (&param_field[24])) = card->info.blkt.inter_packet;
2540         *((unsigned int *) (&param_field[28])) =
2541                 card->info.blkt.inter_packet_jumbo;
2542 }
2543
2544 static int qeth_qdio_activate(struct qeth_card *card)
2545 {
2546         QETH_DBF_TEXT(SETUP, 3, "qdioact");
2547         return qdio_activate(CARD_DDEV(card));
2548 }
2549
2550 static int qeth_dm_act(struct qeth_card *card)
2551 {
2552         int rc;
2553         struct qeth_cmd_buffer *iob;
2554
2555         QETH_DBF_TEXT(SETUP, 2, "dmact");
2556
2557         iob = qeth_wait_for_buffer(&card->write);
2558         memcpy(iob->data, DM_ACT, DM_ACT_SIZE);
2559
2560         memcpy(QETH_DM_ACT_DEST_ADDR(iob->data),
2561                &card->token.cm_connection_r, QETH_MPC_TOKEN_LENGTH);
2562         memcpy(QETH_DM_ACT_CONNECTION_TOKEN(iob->data),
2563                &card->token.ulp_connection_r, QETH_MPC_TOKEN_LENGTH);
2564         rc = qeth_send_control_data(card, DM_ACT_SIZE, iob, NULL, NULL);
2565         return rc;
2566 }
2567
2568 static int qeth_mpc_initialize(struct qeth_card *card)
2569 {
2570         int rc;
2571
2572         QETH_DBF_TEXT(SETUP, 2, "mpcinit");
2573
2574         rc = qeth_issue_next_read(card);
2575         if (rc) {
2576                 QETH_DBF_TEXT_(SETUP, 2, "1err%d", rc);
2577                 return rc;
2578         }
2579         rc = qeth_cm_enable(card);
2580         if (rc) {
2581                 QETH_DBF_TEXT_(SETUP, 2, "2err%d", rc);
2582                 goto out_qdio;
2583         }
2584         rc = qeth_cm_setup(card);
2585         if (rc) {
2586                 QETH_DBF_TEXT_(SETUP, 2, "3err%d", rc);
2587                 goto out_qdio;
2588         }
2589         rc = qeth_ulp_enable(card);
2590         if (rc) {
2591                 QETH_DBF_TEXT_(SETUP, 2, "4err%d", rc);
2592                 goto out_qdio;
2593         }
2594         rc = qeth_ulp_setup(card);
2595         if (rc) {
2596                 QETH_DBF_TEXT_(SETUP, 2, "5err%d", rc);
2597                 goto out_qdio;
2598         }
2599         rc = qeth_alloc_qdio_buffers(card);
2600         if (rc) {
2601                 QETH_DBF_TEXT_(SETUP, 2, "5err%d", rc);
2602                 goto out_qdio;
2603         }
2604         rc = qeth_qdio_establish(card);
2605         if (rc) {
2606                 QETH_DBF_TEXT_(SETUP, 2, "6err%d", rc);
2607                 qeth_free_qdio_buffers(card);
2608                 goto out_qdio;
2609         }
2610         rc = qeth_qdio_activate(card);
2611         if (rc) {
2612                 QETH_DBF_TEXT_(SETUP, 2, "7err%d", rc);
2613                 goto out_qdio;
2614         }
2615         rc = qeth_dm_act(card);
2616         if (rc) {
2617                 QETH_DBF_TEXT_(SETUP, 2, "8err%d", rc);
2618                 goto out_qdio;
2619         }
2620
2621         return 0;
2622 out_qdio:
2623         qeth_qdio_clear_card(card, card->info.type != QETH_CARD_TYPE_IQD);
2624         qdio_free(CARD_DDEV(card));
2625         return rc;
2626 }
2627
2628 void qeth_print_status_message(struct qeth_card *card)
2629 {
2630         switch (card->info.type) {
2631         case QETH_CARD_TYPE_OSD:
2632         case QETH_CARD_TYPE_OSM:
2633         case QETH_CARD_TYPE_OSX:
2634                 /* VM will use a non-zero first character
2635                  * to indicate a HiperSockets like reporting
2636                  * of the level OSA sets the first character to zero
2637                  * */
2638                 if (!card->info.mcl_level[0]) {
2639                         sprintf(card->info.mcl_level, "%02x%02x",
2640                                 card->info.mcl_level[2],
2641                                 card->info.mcl_level[3]);
2642                         break;
2643                 }
2644                 /* fallthrough */
2645         case QETH_CARD_TYPE_IQD:
2646                 if ((card->info.guestlan) ||
2647                     (card->info.mcl_level[0] & 0x80)) {
2648                         card->info.mcl_level[0] = (char) _ebcasc[(__u8)
2649                                 card->info.mcl_level[0]];
2650                         card->info.mcl_level[1] = (char) _ebcasc[(__u8)
2651                                 card->info.mcl_level[1]];
2652                         card->info.mcl_level[2] = (char) _ebcasc[(__u8)
2653                                 card->info.mcl_level[2]];
2654                         card->info.mcl_level[3] = (char) _ebcasc[(__u8)
2655                                 card->info.mcl_level[3]];
2656                         card->info.mcl_level[QETH_MCL_LENGTH] = 0;
2657                 }
2658                 break;
2659         default:
2660                 memset(&card->info.mcl_level[0], 0, QETH_MCL_LENGTH + 1);
2661         }
2662         dev_info(&card->gdev->dev,
2663                  "Device is a%s card%s%s%s\nwith link type %s.\n",
2664                  qeth_get_cardname(card),
2665                  (card->info.mcl_level[0]) ? " (level: " : "",
2666                  (card->info.mcl_level[0]) ? card->info.mcl_level : "",
2667                  (card->info.mcl_level[0]) ? ")" : "",
2668                  qeth_get_cardname_short(card));
2669 }
2670 EXPORT_SYMBOL_GPL(qeth_print_status_message);
2671
2672 static void qeth_initialize_working_pool_list(struct qeth_card *card)
2673 {
2674         struct qeth_buffer_pool_entry *entry;
2675
2676         QETH_CARD_TEXT(card, 5, "inwrklst");
2677
2678         list_for_each_entry(entry,
2679                             &card->qdio.init_pool.entry_list, init_list) {
2680                 qeth_put_buffer_pool_entry(card, entry);
2681         }
2682 }
2683
2684 static struct qeth_buffer_pool_entry *qeth_find_free_buffer_pool_entry(
2685                                         struct qeth_card *card)
2686 {
2687         struct list_head *plh;
2688         struct qeth_buffer_pool_entry *entry;
2689         int i, free;
2690         struct page *page;
2691
2692         if (list_empty(&card->qdio.in_buf_pool.entry_list))
2693                 return NULL;
2694
2695         list_for_each(plh, &card->qdio.in_buf_pool.entry_list) {
2696                 entry = list_entry(plh, struct qeth_buffer_pool_entry, list);
2697                 free = 1;
2698                 for (i = 0; i < QETH_MAX_BUFFER_ELEMENTS(card); ++i) {
2699                         if (page_count(virt_to_page(entry->elements[i])) > 1) {
2700                                 free = 0;
2701                                 break;
2702                         }
2703                 }
2704                 if (free) {
2705                         list_del_init(&entry->list);
2706                         return entry;
2707                 }
2708         }
2709
2710         /* no free buffer in pool so take first one and swap pages */
2711         entry = list_entry(card->qdio.in_buf_pool.entry_list.next,
2712                         struct qeth_buffer_pool_entry, list);
2713         for (i = 0; i < QETH_MAX_BUFFER_ELEMENTS(card); ++i) {
2714                 if (page_count(virt_to_page(entry->elements[i])) > 1) {
2715                         page = alloc_page(GFP_ATOMIC);
2716                         if (!page) {
2717                                 return NULL;
2718                         } else {
2719                                 free_page((unsigned long)entry->elements[i]);
2720                                 entry->elements[i] = page_address(page);
2721                                 if (card->options.performance_stats)
2722                                         card->perf_stats.sg_alloc_page_rx++;
2723                         }
2724                 }
2725         }
2726         list_del_init(&entry->list);
2727         return entry;
2728 }
2729
2730 static int qeth_init_input_buffer(struct qeth_card *card,
2731                 struct qeth_qdio_buffer *buf)
2732 {
2733         struct qeth_buffer_pool_entry *pool_entry;
2734         int i;
2735
2736         if ((card->options.cq == QETH_CQ_ENABLED) && (!buf->rx_skb)) {
2737                 buf->rx_skb = netdev_alloc_skb(card->dev,
2738                                                QETH_RX_PULL_LEN + ETH_HLEN);
2739                 if (!buf->rx_skb)
2740                         return 1;
2741         }
2742
2743         pool_entry = qeth_find_free_buffer_pool_entry(card);
2744         if (!pool_entry)
2745                 return 1;
2746
2747         /*
2748          * since the buffer is accessed only from the input_tasklet
2749          * there shouldn't be a need to synchronize; also, since we use
2750          * the QETH_IN_BUF_REQUEUE_THRESHOLD we should never run  out off
2751          * buffers
2752          */
2753
2754         buf->pool_entry = pool_entry;
2755         for (i = 0; i < QETH_MAX_BUFFER_ELEMENTS(card); ++i) {
2756                 buf->buffer->element[i].length = PAGE_SIZE;
2757                 buf->buffer->element[i].addr =  pool_entry->elements[i];
2758                 if (i == QETH_MAX_BUFFER_ELEMENTS(card) - 1)
2759                         buf->buffer->element[i].eflags = SBAL_EFLAGS_LAST_ENTRY;
2760                 else
2761                         buf->buffer->element[i].eflags = 0;
2762                 buf->buffer->element[i].sflags = 0;
2763         }
2764         return 0;
2765 }
2766
2767 int qeth_init_qdio_queues(struct qeth_card *card)
2768 {
2769         int i, j;
2770         int rc;
2771
2772         QETH_DBF_TEXT(SETUP, 2, "initqdqs");
2773
2774         /* inbound queue */
2775         qdio_reset_buffers(card->qdio.in_q->qdio_bufs, QDIO_MAX_BUFFERS_PER_Q);
2776         memset(&card->rx, 0, sizeof(struct qeth_rx));
2777         qeth_initialize_working_pool_list(card);
2778         /*give only as many buffers to hardware as we have buffer pool entries*/
2779         for (i = 0; i < card->qdio.in_buf_pool.buf_count - 1; ++i)
2780                 qeth_init_input_buffer(card, &card->qdio.in_q->bufs[i]);
2781         card->qdio.in_q->next_buf_to_init =
2782                 card->qdio.in_buf_pool.buf_count - 1;
2783         rc = do_QDIO(CARD_DDEV(card), QDIO_FLAG_SYNC_INPUT, 0, 0,
2784                      card->qdio.in_buf_pool.buf_count - 1);
2785         if (rc) {
2786                 QETH_DBF_TEXT_(SETUP, 2, "1err%d", rc);
2787                 return rc;
2788         }
2789
2790         /* completion */
2791         rc = qeth_cq_init(card);
2792         if (rc) {
2793                 return rc;
2794         }
2795
2796         /* outbound queue */
2797         for (i = 0; i < card->qdio.no_out_queues; ++i) {
2798                 qdio_reset_buffers(card->qdio.out_qs[i]->qdio_bufs,
2799                                    QDIO_MAX_BUFFERS_PER_Q);
2800                 for (j = 0; j < QDIO_MAX_BUFFERS_PER_Q; ++j) {
2801                         qeth_clear_output_buffer(card->qdio.out_qs[i],
2802                                                  card->qdio.out_qs[i]->bufs[j]);
2803                 }
2804                 card->qdio.out_qs[i]->card = card;
2805                 card->qdio.out_qs[i]->next_buf_to_fill = 0;
2806                 card->qdio.out_qs[i]->do_pack = 0;
2807                 atomic_set(&card->qdio.out_qs[i]->used_buffers, 0);
2808                 atomic_set(&card->qdio.out_qs[i]->set_pci_flags_count, 0);
2809                 atomic_set(&card->qdio.out_qs[i]->state,
2810                            QETH_OUT_Q_UNLOCKED);
2811         }
2812         return 0;
2813 }
2814 EXPORT_SYMBOL_GPL(qeth_init_qdio_queues);
2815
2816 static __u8 qeth_get_ipa_adp_type(enum qeth_link_types link_type)
2817 {
2818         switch (link_type) {
2819         case QETH_LINK_TYPE_HSTR:
2820                 return 2;
2821         default:
2822                 return 1;
2823         }
2824 }
2825
2826 static void qeth_fill_ipacmd_header(struct qeth_card *card,
2827                                     struct qeth_ipa_cmd *cmd,
2828                                     enum qeth_ipa_cmds command,
2829                                     enum qeth_prot_versions prot)
2830 {
2831         cmd->hdr.command = command;
2832         cmd->hdr.initiator = IPA_CMD_INITIATOR_HOST;
2833         /* cmd->hdr.seqno is set by qeth_send_control_data() */
2834         cmd->hdr.adapter_type = qeth_get_ipa_adp_type(card->info.link_type);
2835         cmd->hdr.rel_adapter_no = (u8) card->dev->dev_port;
2836         cmd->hdr.prim_version_no = IS_LAYER2(card) ? 2 : 1;
2837         cmd->hdr.param_count = 1;
2838         cmd->hdr.prot_version = prot;
2839 }
2840
2841 void qeth_prepare_ipa_cmd(struct qeth_card *card, struct qeth_cmd_buffer *iob,
2842                           u16 cmd_length)
2843 {
2844         u16 total_length = IPA_PDU_HEADER_SIZE + cmd_length;
2845         u8 prot_type = qeth_mpc_select_prot_type(card);
2846
2847         memcpy(iob->data, IPA_PDU_HEADER, IPA_PDU_HEADER_SIZE);
2848         memcpy(QETH_IPA_PDU_LEN_TOTAL(iob->data), &total_length, 2);
2849         memcpy(QETH_IPA_CMD_PROT_TYPE(iob->data), &prot_type, 1);
2850         memcpy(QETH_IPA_PDU_LEN_PDU1(iob->data), &cmd_length, 2);
2851         memcpy(QETH_IPA_PDU_LEN_PDU2(iob->data), &cmd_length, 2);
2852         memcpy(QETH_IPA_CMD_DEST_ADDR(iob->data),
2853                &card->token.ulp_connection_r, QETH_MPC_TOKEN_LENGTH);
2854         memcpy(QETH_IPA_PDU_LEN_PDU3(iob->data), &cmd_length, 2);
2855 }
2856 EXPORT_SYMBOL_GPL(qeth_prepare_ipa_cmd);
2857
2858 struct qeth_cmd_buffer *qeth_get_ipacmd_buffer(struct qeth_card *card,
2859                 enum qeth_ipa_cmds ipacmd, enum qeth_prot_versions prot)
2860 {
2861         struct qeth_cmd_buffer *iob;
2862
2863         iob = qeth_get_buffer(&card->write);
2864         if (iob) {
2865                 qeth_prepare_ipa_cmd(card, iob, sizeof(struct qeth_ipa_cmd));
2866                 qeth_fill_ipacmd_header(card, __ipa_cmd(iob), ipacmd, prot);
2867         } else {
2868                 dev_warn(&card->gdev->dev,
2869                          "The qeth driver ran out of channel command buffers\n");
2870                 QETH_DBF_MESSAGE(1, "device %x ran out of channel command buffers",
2871                                  CARD_DEVID(card));
2872         }
2873
2874         return iob;
2875 }
2876 EXPORT_SYMBOL_GPL(qeth_get_ipacmd_buffer);
2877
2878 /**
2879  * qeth_send_ipa_cmd() - send an IPA command
2880  *
2881  * See qeth_send_control_data() for explanation of the arguments.
2882  */
2883
2884 int qeth_send_ipa_cmd(struct qeth_card *card, struct qeth_cmd_buffer *iob,
2885                 int (*reply_cb)(struct qeth_card *, struct qeth_reply*,
2886                         unsigned long),
2887                 void *reply_param)
2888 {
2889         u16 length;
2890         int rc;
2891
2892         QETH_CARD_TEXT(card, 4, "sendipa");
2893         memcpy(&length, QETH_IPA_PDU_LEN_TOTAL(iob->data), 2);
2894         rc = qeth_send_control_data(card, length, iob, reply_cb, reply_param);
2895         if (rc == -ETIME) {
2896                 qeth_clear_ipacmd_list(card);
2897                 qeth_schedule_recovery(card);
2898         }
2899         return rc;
2900 }
2901 EXPORT_SYMBOL_GPL(qeth_send_ipa_cmd);
2902
2903 static int qeth_send_startlan(struct qeth_card *card)
2904 {
2905         int rc;
2906         struct qeth_cmd_buffer *iob;
2907
2908         QETH_DBF_TEXT(SETUP, 2, "strtlan");
2909
2910         iob = qeth_get_ipacmd_buffer(card, IPA_CMD_STARTLAN, 0);
2911         if (!iob)
2912                 return -ENOMEM;
2913         rc = qeth_send_ipa_cmd(card, iob, NULL, NULL);
2914         return rc;
2915 }
2916
2917 static int qeth_setadpparms_inspect_rc(struct qeth_ipa_cmd *cmd)
2918 {
2919         if (!cmd->hdr.return_code)
2920                 cmd->hdr.return_code =
2921                         cmd->data.setadapterparms.hdr.return_code;
2922         return cmd->hdr.return_code;
2923 }
2924
2925 static int qeth_query_setadapterparms_cb(struct qeth_card *card,
2926                 struct qeth_reply *reply, unsigned long data)
2927 {
2928         struct qeth_ipa_cmd *cmd = (struct qeth_ipa_cmd *) data;
2929
2930         QETH_CARD_TEXT(card, 3, "quyadpcb");
2931         if (qeth_setadpparms_inspect_rc(cmd))
2932                 return 0;
2933
2934         if (cmd->data.setadapterparms.data.query_cmds_supp.lan_type & 0x7f) {
2935                 card->info.link_type =
2936                       cmd->data.setadapterparms.data.query_cmds_supp.lan_type;
2937                 QETH_DBF_TEXT_(SETUP, 2, "lnk %d", card->info.link_type);
2938         }
2939         card->options.adp.supported_funcs =
2940                 cmd->data.setadapterparms.data.query_cmds_supp.supported_cmds;
2941         return 0;
2942 }
2943
2944 static struct qeth_cmd_buffer *qeth_get_adapter_cmd(struct qeth_card *card,
2945                 __u32 command, __u32 cmdlen)
2946 {
2947         struct qeth_cmd_buffer *iob;
2948         struct qeth_ipa_cmd *cmd;
2949
2950         iob = qeth_get_ipacmd_buffer(card, IPA_CMD_SETADAPTERPARMS,
2951                                      QETH_PROT_IPV4);
2952         if (iob) {
2953                 cmd = __ipa_cmd(iob);
2954                 cmd->data.setadapterparms.hdr.cmdlength = cmdlen;
2955                 cmd->data.setadapterparms.hdr.command_code = command;
2956                 cmd->data.setadapterparms.hdr.used_total = 1;
2957                 cmd->data.setadapterparms.hdr.seq_no = 1;
2958         }
2959
2960         return iob;
2961 }
2962
2963 static int qeth_query_setadapterparms(struct qeth_card *card)
2964 {
2965         int rc;
2966         struct qeth_cmd_buffer *iob;
2967
2968         QETH_CARD_TEXT(card, 3, "queryadp");
2969         iob = qeth_get_adapter_cmd(card, IPA_SETADP_QUERY_COMMANDS_SUPPORTED,
2970                                    sizeof(struct qeth_ipacmd_setadpparms));
2971         if (!iob)
2972                 return -ENOMEM;
2973         rc = qeth_send_ipa_cmd(card, iob, qeth_query_setadapterparms_cb, NULL);
2974         return rc;
2975 }
2976
2977 static int qeth_query_ipassists_cb(struct qeth_card *card,
2978                 struct qeth_reply *reply, unsigned long data)
2979 {
2980         struct qeth_ipa_cmd *cmd;
2981
2982         QETH_DBF_TEXT(SETUP, 2, "qipasscb");
2983
2984         cmd = (struct qeth_ipa_cmd *) data;
2985
2986         switch (cmd->hdr.return_code) {
2987         case IPA_RC_NOTSUPP:
2988         case IPA_RC_L2_UNSUPPORTED_CMD:
2989                 QETH_DBF_TEXT(SETUP, 2, "ipaunsup");
2990                 card->options.ipa4.supported_funcs |= IPA_SETADAPTERPARMS;
2991                 card->options.ipa6.supported_funcs |= IPA_SETADAPTERPARMS;
2992                 return 0;
2993         default:
2994                 if (cmd->hdr.return_code) {
2995                         QETH_DBF_MESSAGE(1, "IPA_CMD_QIPASSIST on device %x: Unhandled rc=%#x\n",
2996                                          CARD_DEVID(card),
2997                                          cmd->hdr.return_code);
2998                         return 0;
2999                 }
3000         }
3001
3002         if (cmd->hdr.prot_version == QETH_PROT_IPV4) {
3003                 card->options.ipa4.supported_funcs = cmd->hdr.ipa_supported;
3004                 card->options.ipa4.enabled_funcs = cmd->hdr.ipa_enabled;
3005         } else if (cmd->hdr.prot_version == QETH_PROT_IPV6) {
3006                 card->options.ipa6.supported_funcs = cmd->hdr.ipa_supported;
3007                 card->options.ipa6.enabled_funcs = cmd->hdr.ipa_enabled;
3008         } else
3009                 QETH_DBF_MESSAGE(1, "IPA_CMD_QIPASSIST on device %x: Flawed LIC detected\n",
3010                                  CARD_DEVID(card));
3011         return 0;
3012 }
3013
3014 static int qeth_query_ipassists(struct qeth_card *card,
3015                                 enum qeth_prot_versions prot)
3016 {
3017         int rc;
3018         struct qeth_cmd_buffer *iob;
3019
3020         QETH_DBF_TEXT_(SETUP, 2, "qipassi%i", prot);
3021         iob = qeth_get_ipacmd_buffer(card, IPA_CMD_QIPASSIST, prot);
3022         if (!iob)
3023                 return -ENOMEM;
3024         rc = qeth_send_ipa_cmd(card, iob, qeth_query_ipassists_cb, NULL);
3025         return rc;
3026 }
3027
3028 static int qeth_query_switch_attributes_cb(struct qeth_card *card,
3029                                 struct qeth_reply *reply, unsigned long data)
3030 {
3031         struct qeth_ipa_cmd *cmd = (struct qeth_ipa_cmd *) data;
3032         struct qeth_query_switch_attributes *attrs;
3033         struct qeth_switch_info *sw_info;
3034
3035         QETH_CARD_TEXT(card, 2, "qswiatcb");
3036         if (qeth_setadpparms_inspect_rc(cmd))
3037                 return 0;
3038
3039         sw_info = (struct qeth_switch_info *)reply->param;
3040         attrs = &cmd->data.setadapterparms.data.query_switch_attributes;
3041         sw_info->capabilities = attrs->capabilities;
3042         sw_info->settings = attrs->settings;
3043         QETH_CARD_TEXT_(card, 2, "%04x%04x", sw_info->capabilities,
3044                         sw_info->settings);
3045         return 0;
3046 }
3047
3048 int qeth_query_switch_attributes(struct qeth_card *card,
3049                                  struct qeth_switch_info *sw_info)
3050 {
3051         struct qeth_cmd_buffer *iob;
3052
3053         QETH_CARD_TEXT(card, 2, "qswiattr");
3054         if (!qeth_adp_supported(card, IPA_SETADP_QUERY_SWITCH_ATTRIBUTES))
3055                 return -EOPNOTSUPP;
3056         if (!netif_carrier_ok(card->dev))
3057                 return -ENOMEDIUM;
3058         iob = qeth_get_adapter_cmd(card, IPA_SETADP_QUERY_SWITCH_ATTRIBUTES,
3059                                 sizeof(struct qeth_ipacmd_setadpparms_hdr));
3060         if (!iob)
3061                 return -ENOMEM;
3062         return qeth_send_ipa_cmd(card, iob,
3063                                 qeth_query_switch_attributes_cb, sw_info);
3064 }
3065
3066 static int qeth_query_setdiagass_cb(struct qeth_card *card,
3067                 struct qeth_reply *reply, unsigned long data)
3068 {
3069         struct qeth_ipa_cmd *cmd;
3070         __u16 rc;
3071
3072         cmd = (struct qeth_ipa_cmd *)data;
3073         rc = cmd->hdr.return_code;
3074         if (rc)
3075                 QETH_CARD_TEXT_(card, 2, "diagq:%x", rc);
3076         else
3077                 card->info.diagass_support = cmd->data.diagass.ext;
3078         return 0;
3079 }
3080
3081 static int qeth_query_setdiagass(struct qeth_card *card)
3082 {
3083         struct qeth_cmd_buffer *iob;
3084         struct qeth_ipa_cmd    *cmd;
3085
3086         QETH_DBF_TEXT(SETUP, 2, "qdiagass");
3087         iob = qeth_get_ipacmd_buffer(card, IPA_CMD_SET_DIAG_ASS, 0);
3088         if (!iob)
3089                 return -ENOMEM;
3090         cmd = __ipa_cmd(iob);
3091         cmd->data.diagass.subcmd_len = 16;
3092         cmd->data.diagass.subcmd = QETH_DIAGS_CMD_QUERY;
3093         return qeth_send_ipa_cmd(card, iob, qeth_query_setdiagass_cb, NULL);
3094 }
3095
3096 static void qeth_get_trap_id(struct qeth_card *card, struct qeth_trap_id *tid)
3097 {
3098         unsigned long info = get_zeroed_page(GFP_KERNEL);
3099         struct sysinfo_2_2_2 *info222 = (struct sysinfo_2_2_2 *)info;
3100         struct sysinfo_3_2_2 *info322 = (struct sysinfo_3_2_2 *)info;
3101         struct ccw_dev_id ccwid;
3102         int level;
3103
3104         tid->chpid = card->info.chpid;
3105         ccw_device_get_id(CARD_RDEV(card), &ccwid);
3106         tid->ssid = ccwid.ssid;
3107         tid->devno = ccwid.devno;
3108         if (!info)
3109                 return;
3110         level = stsi(NULL, 0, 0, 0);
3111         if ((level >= 2) && (stsi(info222, 2, 2, 2) == 0))
3112                 tid->lparnr = info222->lpar_number;
3113         if ((level >= 3) && (stsi(info322, 3, 2, 2) == 0)) {
3114                 EBCASC(info322->vm[0].name, sizeof(info322->vm[0].name));
3115                 memcpy(tid->vmname, info322->vm[0].name, sizeof(tid->vmname));
3116         }
3117         free_page(info);
3118         return;
3119 }
3120
3121 static int qeth_hw_trap_cb(struct qeth_card *card,
3122                 struct qeth_reply *reply, unsigned long data)
3123 {
3124         struct qeth_ipa_cmd *cmd;
3125         __u16 rc;
3126
3127         cmd = (struct qeth_ipa_cmd *)data;
3128         rc = cmd->hdr.return_code;
3129         if (rc)
3130                 QETH_CARD_TEXT_(card, 2, "trapc:%x", rc);
3131         return 0;
3132 }
3133
3134 int qeth_hw_trap(struct qeth_card *card, enum qeth_diags_trap_action action)
3135 {
3136         struct qeth_cmd_buffer *iob;
3137         struct qeth_ipa_cmd *cmd;
3138
3139         QETH_DBF_TEXT(SETUP, 2, "diagtrap");
3140         iob = qeth_get_ipacmd_buffer(card, IPA_CMD_SET_DIAG_ASS, 0);
3141         if (!iob)
3142                 return -ENOMEM;
3143         cmd = __ipa_cmd(iob);
3144         cmd->data.diagass.subcmd_len = 80;
3145         cmd->data.diagass.subcmd = QETH_DIAGS_CMD_TRAP;
3146         cmd->data.diagass.type = 1;
3147         cmd->data.diagass.action = action;
3148         switch (action) {
3149         case QETH_DIAGS_TRAP_ARM:
3150                 cmd->data.diagass.options = 0x0003;
3151                 cmd->data.diagass.ext = 0x00010000 +
3152                         sizeof(struct qeth_trap_id);
3153                 qeth_get_trap_id(card,
3154                         (struct qeth_trap_id *)cmd->data.diagass.cdata);
3155                 break;
3156         case QETH_DIAGS_TRAP_DISARM:
3157                 cmd->data.diagass.options = 0x0001;
3158                 break;
3159         case QETH_DIAGS_TRAP_CAPTURE:
3160                 break;
3161         }
3162         return qeth_send_ipa_cmd(card, iob, qeth_hw_trap_cb, NULL);
3163 }
3164 EXPORT_SYMBOL_GPL(qeth_hw_trap);
3165
3166 static int qeth_check_qdio_errors(struct qeth_card *card,
3167                                   struct qdio_buffer *buf,
3168                                   unsigned int qdio_error,
3169                                   const char *dbftext)
3170 {
3171         if (qdio_error) {
3172                 QETH_CARD_TEXT(card, 2, dbftext);
3173                 QETH_CARD_TEXT_(card, 2, " F15=%02X",
3174                                buf->element[15].sflags);
3175                 QETH_CARD_TEXT_(card, 2, " F14=%02X",
3176                                buf->element[14].sflags);
3177                 QETH_CARD_TEXT_(card, 2, " qerr=%X", qdio_error);
3178                 if ((buf->element[15].sflags) == 0x12) {
3179                         card->stats.rx_dropped++;
3180                         return 0;
3181                 } else
3182                         return 1;
3183         }
3184         return 0;
3185 }
3186
3187 static void qeth_queue_input_buffer(struct qeth_card *card, int index)
3188 {
3189         struct qeth_qdio_q *queue = card->qdio.in_q;
3190         struct list_head *lh;
3191         int count;
3192         int i;
3193         int rc;
3194         int newcount = 0;
3195
3196         count = (index < queue->next_buf_to_init)?
3197                 card->qdio.in_buf_pool.buf_count -
3198                 (queue->next_buf_to_init - index) :
3199                 card->qdio.in_buf_pool.buf_count -
3200                 (queue->next_buf_to_init + QDIO_MAX_BUFFERS_PER_Q - index);
3201         /* only requeue at a certain threshold to avoid SIGAs */
3202         if (count >= QETH_IN_BUF_REQUEUE_THRESHOLD(card)) {
3203                 for (i = queue->next_buf_to_init;
3204                      i < queue->next_buf_to_init + count; ++i) {
3205                         if (qeth_init_input_buffer(card,
3206                                 &queue->bufs[i % QDIO_MAX_BUFFERS_PER_Q])) {
3207                                 break;
3208                         } else {
3209                                 newcount++;
3210                         }
3211                 }
3212
3213                 if (newcount < count) {
3214                         /* we are in memory shortage so we switch back to
3215                            traditional skb allocation and drop packages */
3216                         atomic_set(&card->force_alloc_skb, 3);
3217                         count = newcount;
3218                 } else {
3219                         atomic_add_unless(&card->force_alloc_skb, -1, 0);
3220                 }
3221
3222                 if (!count) {
3223                         i = 0;
3224                         list_for_each(lh, &card->qdio.in_buf_pool.entry_list)
3225                                 i++;
3226                         if (i == card->qdio.in_buf_pool.buf_count) {
3227                                 QETH_CARD_TEXT(card, 2, "qsarbw");
3228                                 card->reclaim_index = index;
3229                                 schedule_delayed_work(
3230                                         &card->buffer_reclaim_work,
3231                                         QETH_RECLAIM_WORK_TIME);
3232                         }
3233                         return;
3234                 }
3235
3236                 /*
3237                  * according to old code it should be avoided to requeue all
3238                  * 128 buffers in order to benefit from PCI avoidance.
3239                  * this function keeps at least one buffer (the buffer at
3240                  * 'index') un-requeued -> this buffer is the first buffer that
3241                  * will be requeued the next time
3242                  */
3243                 if (card->options.performance_stats) {
3244                         card->perf_stats.inbound_do_qdio_cnt++;
3245                         card->perf_stats.inbound_do_qdio_start_time =
3246                                 qeth_get_micros();
3247                 }
3248                 rc = do_QDIO(CARD_DDEV(card), QDIO_FLAG_SYNC_INPUT, 0,
3249                              queue->next_buf_to_init, count);
3250                 if (card->options.performance_stats)
3251                         card->perf_stats.inbound_do_qdio_time +=
3252                                 qeth_get_micros() -
3253                                 card->perf_stats.inbound_do_qdio_start_time;
3254                 if (rc) {
3255                         QETH_CARD_TEXT(card, 2, "qinberr");
3256                 }
3257                 queue->next_buf_to_init = (queue->next_buf_to_init + count) %
3258                                           QDIO_MAX_BUFFERS_PER_Q;
3259         }
3260 }
3261
3262 static void qeth_buffer_reclaim_work(struct work_struct *work)
3263 {
3264         struct qeth_card *card = container_of(work, struct qeth_card,
3265                 buffer_reclaim_work.work);
3266
3267         QETH_CARD_TEXT_(card, 2, "brw:%x", card->reclaim_index);
3268         qeth_queue_input_buffer(card, card->reclaim_index);
3269 }
3270
3271 static void qeth_handle_send_error(struct qeth_card *card,
3272                 struct qeth_qdio_out_buffer *buffer, unsigned int qdio_err)
3273 {
3274         int sbalf15 = buffer->buffer->element[15].sflags;
3275
3276         QETH_CARD_TEXT(card, 6, "hdsnderr");
3277         if (card->info.type == QETH_CARD_TYPE_IQD) {
3278                 if (sbalf15 == 0) {
3279                         qdio_err = 0;
3280                 } else {
3281                         qdio_err = 1;
3282                 }
3283         }
3284         qeth_check_qdio_errors(card, buffer->buffer, qdio_err, "qouterr");
3285
3286         if (!qdio_err)
3287                 return;
3288
3289         if ((sbalf15 >= 15) && (sbalf15 <= 31))
3290                 return;
3291
3292         QETH_CARD_TEXT(card, 1, "lnkfail");
3293         QETH_CARD_TEXT_(card, 1, "%04x %02x",
3294                        (u16)qdio_err, (u8)sbalf15);
3295 }
3296
3297 /**
3298  * qeth_prep_flush_pack_buffer - Prepares flushing of a packing buffer.
3299  * @queue: queue to check for packing buffer
3300  *
3301  * Returns number of buffers that were prepared for flush.
3302  */
3303 static int qeth_prep_flush_pack_buffer(struct qeth_qdio_out_q *queue)
3304 {
3305         struct qeth_qdio_out_buffer *buffer;
3306
3307         buffer = queue->bufs[queue->next_buf_to_fill];
3308         if ((atomic_read(&buffer->state) == QETH_QDIO_BUF_EMPTY) &&
3309             (buffer->next_element_to_fill > 0)) {
3310                 /* it's a packing buffer */
3311                 atomic_set(&buffer->state, QETH_QDIO_BUF_PRIMED);
3312                 queue->next_buf_to_fill =
3313                         (queue->next_buf_to_fill + 1) % QDIO_MAX_BUFFERS_PER_Q;
3314                 return 1;
3315         }
3316         return 0;
3317 }
3318
3319 /*
3320  * Switched to packing state if the number of used buffers on a queue
3321  * reaches a certain limit.
3322  */
3323 static void qeth_switch_to_packing_if_needed(struct qeth_qdio_out_q *queue)
3324 {
3325         if (!queue->do_pack) {
3326                 if (atomic_read(&queue->used_buffers)
3327                     >= QETH_HIGH_WATERMARK_PACK){
3328                         /* switch non-PACKING -> PACKING */
3329                         QETH_CARD_TEXT(queue->card, 6, "np->pack");
3330                         if (queue->card->options.performance_stats)
3331                                 queue->card->perf_stats.sc_dp_p++;
3332                         queue->do_pack = 1;
3333                 }
3334         }
3335 }
3336
3337 /*
3338  * Switches from packing to non-packing mode. If there is a packing
3339  * buffer on the queue this buffer will be prepared to be flushed.
3340  * In that case 1 is returned to inform the caller. If no buffer
3341  * has to be flushed, zero is returned.
3342  */
3343 static int qeth_switch_to_nonpacking_if_needed(struct qeth_qdio_out_q *queue)
3344 {
3345         if (queue->do_pack) {
3346                 if (atomic_read(&queue->used_buffers)
3347                     <= QETH_LOW_WATERMARK_PACK) {
3348                         /* switch PACKING -> non-PACKING */
3349                         QETH_CARD_TEXT(queue->card, 6, "pack->np");
3350                         if (queue->card->options.performance_stats)
3351                                 queue->card->perf_stats.sc_p_dp++;
3352                         queue->do_pack = 0;
3353                         return qeth_prep_flush_pack_buffer(queue);
3354                 }
3355         }
3356         return 0;
3357 }
3358
3359 static void qeth_flush_buffers(struct qeth_qdio_out_q *queue, int index,
3360                                int count)
3361 {
3362         struct qeth_qdio_out_buffer *buf;
3363         int rc;
3364         int i;
3365         unsigned int qdio_flags;
3366
3367         for (i = index; i < index + count; ++i) {
3368                 int bidx = i % QDIO_MAX_BUFFERS_PER_Q;
3369                 buf = queue->bufs[bidx];
3370                 buf->buffer->element[buf->next_element_to_fill - 1].eflags |=
3371                                 SBAL_EFLAGS_LAST_ENTRY;
3372
3373                 if (queue->bufstates)
3374                         queue->bufstates[bidx].user = buf;
3375
3376                 if (queue->card->info.type == QETH_CARD_TYPE_IQD)
3377                         continue;
3378
3379                 if (!queue->do_pack) {
3380                         if ((atomic_read(&queue->used_buffers) >=
3381                                 (QETH_HIGH_WATERMARK_PACK -
3382                                  QETH_WATERMARK_PACK_FUZZ)) &&
3383                             !atomic_read(&queue->set_pci_flags_count)) {
3384                                 /* it's likely that we'll go to packing
3385                                  * mode soon */
3386                                 atomic_inc(&queue->set_pci_flags_count);
3387                                 buf->buffer->element[0].sflags |= SBAL_SFLAGS0_PCI_REQ;
3388                         }
3389                 } else {
3390                         if (!atomic_read(&queue->set_pci_flags_count)) {
3391                                 /*
3392                                  * there's no outstanding PCI any more, so we
3393                                  * have to request a PCI to be sure the the PCI
3394                                  * will wake at some time in the future then we
3395                                  * can flush packed buffers that might still be
3396                                  * hanging around, which can happen if no
3397                                  * further send was requested by the stack
3398                                  */
3399                                 atomic_inc(&queue->set_pci_flags_count);
3400                                 buf->buffer->element[0].sflags |= SBAL_SFLAGS0_PCI_REQ;
3401                         }
3402                 }
3403         }
3404
3405         netif_trans_update(queue->card->dev);
3406         if (queue->card->options.performance_stats) {
3407                 queue->card->perf_stats.outbound_do_qdio_cnt++;
3408                 queue->card->perf_stats.outbound_do_qdio_start_time =
3409                         qeth_get_micros();
3410         }
3411         qdio_flags = QDIO_FLAG_SYNC_OUTPUT;
3412         if (atomic_read(&queue->set_pci_flags_count))
3413                 qdio_flags |= QDIO_FLAG_PCI_OUT;
3414         atomic_add(count, &queue->used_buffers);
3415
3416         rc = do_QDIO(CARD_DDEV(queue->card), qdio_flags,
3417                      queue->queue_no, index, count);
3418         if (queue->card->options.performance_stats)
3419                 queue->card->perf_stats.outbound_do_qdio_time +=
3420                         qeth_get_micros() -
3421                         queue->card->perf_stats.outbound_do_qdio_start_time;
3422         if (rc) {
3423                 queue->card->stats.tx_errors += count;
3424                 /* ignore temporary SIGA errors without busy condition */
3425                 if (rc == -ENOBUFS)
3426                         return;
3427                 QETH_CARD_TEXT(queue->card, 2, "flushbuf");
3428                 QETH_CARD_TEXT_(queue->card, 2, " q%d", queue->queue_no);
3429                 QETH_CARD_TEXT_(queue->card, 2, " idx%d", index);
3430                 QETH_CARD_TEXT_(queue->card, 2, " c%d", count);
3431                 QETH_CARD_TEXT_(queue->card, 2, " err%d", rc);
3432
3433                 /* this must not happen under normal circumstances. if it
3434                  * happens something is really wrong -> recover */
3435                 qeth_schedule_recovery(queue->card);
3436                 return;
3437         }
3438         if (queue->card->options.performance_stats)
3439                 queue->card->perf_stats.bufs_sent += count;
3440 }
3441
3442 static void qeth_check_outbound_queue(struct qeth_qdio_out_q *queue)
3443 {
3444         int index;
3445         int flush_cnt = 0;
3446         int q_was_packing = 0;
3447
3448         /*
3449          * check if weed have to switch to non-packing mode or if
3450          * we have to get a pci flag out on the queue
3451          */
3452         if ((atomic_read(&queue->used_buffers) <= QETH_LOW_WATERMARK_PACK) ||
3453             !atomic_read(&queue->set_pci_flags_count)) {
3454                 if (atomic_xchg(&queue->state, QETH_OUT_Q_LOCKED_FLUSH) ==
3455                                 QETH_OUT_Q_UNLOCKED) {
3456                         /*
3457                          * If we get in here, there was no action in
3458                          * do_send_packet. So, we check if there is a
3459                          * packing buffer to be flushed here.
3460                          */
3461                         netif_stop_queue(queue->card->dev);
3462                         index = queue->next_buf_to_fill;
3463                         q_was_packing = queue->do_pack;
3464                         /* queue->do_pack may change */
3465                         barrier();
3466                         flush_cnt += qeth_switch_to_nonpacking_if_needed(queue);
3467                         if (!flush_cnt &&
3468                             !atomic_read(&queue->set_pci_flags_count))
3469                                 flush_cnt += qeth_prep_flush_pack_buffer(queue);
3470                         if (queue->card->options.performance_stats &&
3471                             q_was_packing)
3472                                 queue->card->perf_stats.bufs_sent_pack +=
3473                                         flush_cnt;
3474                         if (flush_cnt)
3475                                 qeth_flush_buffers(queue, index, flush_cnt);
3476                         atomic_set(&queue->state, QETH_OUT_Q_UNLOCKED);
3477                 }
3478         }
3479 }
3480
3481 static void qeth_qdio_start_poll(struct ccw_device *ccwdev, int queue,
3482                                  unsigned long card_ptr)
3483 {
3484         struct qeth_card *card = (struct qeth_card *)card_ptr;
3485
3486         if (card->dev->flags & IFF_UP)
3487                 napi_schedule(&card->napi);
3488 }
3489
3490 int qeth_configure_cq(struct qeth_card *card, enum qeth_cq cq)
3491 {
3492         int rc;
3493
3494         if (card->options.cq ==  QETH_CQ_NOTAVAILABLE) {
3495                 rc = -1;
3496                 goto out;
3497         } else {
3498                 if (card->options.cq == cq) {
3499                         rc = 0;
3500                         goto out;
3501                 }
3502
3503                 if (card->state != CARD_STATE_DOWN &&
3504                     card->state != CARD_STATE_RECOVER) {
3505                         rc = -1;
3506                         goto out;
3507                 }
3508
3509                 qeth_free_qdio_buffers(card);
3510                 card->options.cq = cq;
3511                 rc = 0;
3512         }
3513 out:
3514         return rc;
3515
3516 }
3517 EXPORT_SYMBOL_GPL(qeth_configure_cq);
3518
3519 static void qeth_qdio_cq_handler(struct qeth_card *card, unsigned int qdio_err,
3520                                  unsigned int queue, int first_element,
3521                                  int count)
3522 {
3523         struct qeth_qdio_q *cq = card->qdio.c_q;
3524         int i;
3525         int rc;
3526
3527         if (!qeth_is_cq(card, queue))
3528                 goto out;
3529
3530         QETH_CARD_TEXT_(card, 5, "qcqhe%d", first_element);
3531         QETH_CARD_TEXT_(card, 5, "qcqhc%d", count);
3532         QETH_CARD_TEXT_(card, 5, "qcqherr%d", qdio_err);
3533
3534         if (qdio_err) {
3535                 netif_stop_queue(card->dev);
3536                 qeth_schedule_recovery(card);
3537                 goto out;
3538         }
3539
3540         if (card->options.performance_stats) {
3541                 card->perf_stats.cq_cnt++;
3542                 card->perf_stats.cq_start_time = qeth_get_micros();
3543         }
3544
3545         for (i = first_element; i < first_element + count; ++i) {
3546                 int bidx = i % QDIO_MAX_BUFFERS_PER_Q;
3547                 struct qdio_buffer *buffer = cq->qdio_bufs[bidx];
3548                 int e = 0;
3549
3550                 while ((e < QDIO_MAX_ELEMENTS_PER_BUFFER) &&
3551                        buffer->element[e].addr) {
3552                         unsigned long phys_aob_addr;
3553
3554                         phys_aob_addr = (unsigned long) buffer->element[e].addr;
3555                         qeth_qdio_handle_aob(card, phys_aob_addr);
3556                         ++e;
3557                 }
3558                 qeth_scrub_qdio_buffer(buffer, QDIO_MAX_ELEMENTS_PER_BUFFER);
3559         }
3560         rc = do_QDIO(CARD_DDEV(card), QDIO_FLAG_SYNC_INPUT, queue,
3561                     card->qdio.c_q->next_buf_to_init,
3562                     count);
3563         if (rc) {
3564                 dev_warn(&card->gdev->dev,
3565                         "QDIO reported an error, rc=%i\n", rc);
3566                 QETH_CARD_TEXT(card, 2, "qcqherr");
3567         }
3568         card->qdio.c_q->next_buf_to_init = (card->qdio.c_q->next_buf_to_init
3569                                    + count) % QDIO_MAX_BUFFERS_PER_Q;
3570
3571         if (card->options.performance_stats) {
3572                 int delta_t = qeth_get_micros();
3573                 delta_t -= card->perf_stats.cq_start_time;
3574                 card->perf_stats.cq_time += delta_t;
3575         }
3576 out:
3577         return;
3578 }
3579
3580 static void qeth_qdio_input_handler(struct ccw_device *ccwdev,
3581                                     unsigned int qdio_err, int queue,
3582                                     int first_elem, int count,
3583                                     unsigned long card_ptr)
3584 {
3585         struct qeth_card *card = (struct qeth_card *)card_ptr;
3586
3587         QETH_CARD_TEXT_(card, 2, "qihq%d", queue);
3588         QETH_CARD_TEXT_(card, 2, "qiec%d", qdio_err);
3589
3590         if (qeth_is_cq(card, queue))
3591                 qeth_qdio_cq_handler(card, qdio_err, queue, first_elem, count);
3592         else if (qdio_err)
3593                 qeth_schedule_recovery(card);
3594 }
3595
3596 static void qeth_qdio_output_handler(struct ccw_device *ccwdev,
3597                                      unsigned int qdio_error, int __queue,
3598                                      int first_element, int count,
3599                                      unsigned long card_ptr)
3600 {
3601         struct qeth_card *card        = (struct qeth_card *) card_ptr;
3602         struct qeth_qdio_out_q *queue = card->qdio.out_qs[__queue];
3603         struct qeth_qdio_out_buffer *buffer;
3604         int i;
3605
3606         QETH_CARD_TEXT(card, 6, "qdouhdl");
3607         if (qdio_error & QDIO_ERROR_FATAL) {
3608                 QETH_CARD_TEXT(card, 2, "achkcond");
3609                 netif_stop_queue(card->dev);
3610                 qeth_schedule_recovery(card);
3611                 return;
3612         }
3613         if (card->options.performance_stats) {
3614                 card->perf_stats.outbound_handler_cnt++;
3615                 card->perf_stats.outbound_handler_start_time =
3616                         qeth_get_micros();
3617         }
3618         for (i = first_element; i < (first_element + count); ++i) {
3619                 int bidx = i % QDIO_MAX_BUFFERS_PER_Q;
3620                 buffer = queue->bufs[bidx];
3621                 qeth_handle_send_error(card, buffer, qdio_error);
3622
3623                 if (queue->bufstates &&
3624                     (queue->bufstates[bidx].flags &
3625                      QDIO_OUTBUF_STATE_FLAG_PENDING) != 0) {
3626                         WARN_ON_ONCE(card->options.cq != QETH_CQ_ENABLED);
3627
3628                         if (atomic_cmpxchg(&buffer->state,
3629                                            QETH_QDIO_BUF_PRIMED,
3630                                            QETH_QDIO_BUF_PENDING) ==
3631                                 QETH_QDIO_BUF_PRIMED) {
3632                                 qeth_notify_skbs(queue, buffer,
3633                                                  TX_NOTIFY_PENDING);
3634                         }
3635                         QETH_CARD_TEXT_(queue->card, 5, "pel%d", bidx);
3636
3637                         /* prepare the queue slot for re-use: */
3638                         qeth_scrub_qdio_buffer(buffer->buffer,
3639                                                QETH_MAX_BUFFER_ELEMENTS(card));
3640                         if (qeth_init_qdio_out_buf(queue, bidx)) {
3641                                 QETH_CARD_TEXT(card, 2, "outofbuf");
3642                                 qeth_schedule_recovery(card);
3643                         }
3644                 } else {
3645                         if (card->options.cq == QETH_CQ_ENABLED) {
3646                                 enum iucv_tx_notify n;
3647
3648                                 n = qeth_compute_cq_notification(
3649                                         buffer->buffer->element[15].sflags, 0);
3650                                 qeth_notify_skbs(queue, buffer, n);
3651                         }
3652
3653                         qeth_clear_output_buffer(queue, buffer);
3654                 }
3655                 qeth_cleanup_handled_pending(queue, bidx, 0);
3656         }
3657         atomic_sub(count, &queue->used_buffers);
3658         /* check if we need to do something on this outbound queue */
3659         if (card->info.type != QETH_CARD_TYPE_IQD)
3660                 qeth_check_outbound_queue(queue);
3661
3662         netif_wake_queue(queue->card->dev);
3663         if (card->options.performance_stats)
3664                 card->perf_stats.outbound_handler_time += qeth_get_micros() -
3665                         card->perf_stats.outbound_handler_start_time;
3666 }
3667
3668 /* We cannot use outbound queue 3 for unicast packets on HiperSockets */
3669 static inline int qeth_cut_iqd_prio(struct qeth_card *card, int queue_num)
3670 {
3671         if ((card->info.type == QETH_CARD_TYPE_IQD) && (queue_num == 3))
3672                 return 2;
3673         return queue_num;
3674 }
3675
3676 /**
3677  * Note: Function assumes that we have 4 outbound queues.
3678  */
3679 int qeth_get_priority_queue(struct qeth_card *card, struct sk_buff *skb,
3680                             int ipv)
3681 {
3682         __be16 *tci;
3683         u8 tos;
3684
3685         switch (card->qdio.do_prio_queueing) {
3686         case QETH_PRIO_Q_ING_TOS:
3687         case QETH_PRIO_Q_ING_PREC:
3688                 switch (ipv) {
3689                 case 4:
3690                         tos = ipv4_get_dsfield(ip_hdr(skb));
3691                         break;
3692                 case 6:
3693                         tos = ipv6_get_dsfield(ipv6_hdr(skb));
3694                         break;
3695                 default:
3696                         return card->qdio.default_out_queue;
3697                 }
3698                 if (card->qdio.do_prio_queueing == QETH_PRIO_Q_ING_PREC)
3699                         return qeth_cut_iqd_prio(card, ~tos >> 6 & 3);
3700                 if (tos & IPTOS_MINCOST)
3701                         return qeth_cut_iqd_prio(card, 3);
3702                 if (tos & IPTOS_RELIABILITY)
3703                         return 2;
3704                 if (tos & IPTOS_THROUGHPUT)
3705                         return 1;
3706                 if (tos & IPTOS_LOWDELAY)
3707                         return 0;
3708                 break;
3709         case QETH_PRIO_Q_ING_SKB:
3710                 if (skb->priority > 5)
3711                         return 0;
3712                 return qeth_cut_iqd_prio(card, ~skb->priority >> 1 & 3);
3713         case QETH_PRIO_Q_ING_VLAN:
3714                 tci = &((struct ethhdr *)skb->data)->h_proto;
3715                 if (be16_to_cpu(*tci) == ETH_P_8021Q)
3716                         return qeth_cut_iqd_prio(card,
3717                         ~be16_to_cpu(*(tci + 1)) >> (VLAN_PRIO_SHIFT + 1) & 3);
3718                 break;
3719         default:
3720                 break;
3721         }
3722         return card->qdio.default_out_queue;
3723 }
3724 EXPORT_SYMBOL_GPL(qeth_get_priority_queue);
3725
3726 /**
3727  * qeth_get_elements_for_frags() -      find number of SBALEs for skb frags.
3728  * @skb:                                SKB address
3729  *
3730  * Returns the number of pages, and thus QDIO buffer elements, needed to cover
3731  * fragmented part of the SKB. Returns zero for linear SKB.
3732  */
3733 static int qeth_get_elements_for_frags(struct sk_buff *skb)
3734 {
3735         int cnt, elements = 0;
3736
3737         for (cnt = 0; cnt < skb_shinfo(skb)->nr_frags; cnt++) {
3738                 struct skb_frag_struct *frag = &skb_shinfo(skb)->frags[cnt];
3739
3740                 elements += qeth_get_elements_for_range(
3741                         (addr_t)skb_frag_address(frag),
3742                         (addr_t)skb_frag_address(frag) + skb_frag_size(frag));
3743         }
3744         return elements;
3745 }
3746
3747 /**
3748  * qeth_count_elements() -      Counts the number of QDIO buffer elements needed
3749  *                              to transmit an skb.
3750  * @skb:                        the skb to operate on.
3751  * @data_offset:                skip this part of the skb's linear data
3752  *
3753  * Returns the number of pages, and thus QDIO buffer elements, needed to map the
3754  * skb's data (both its linear part and paged fragments).
3755  */
3756 unsigned int qeth_count_elements(struct sk_buff *skb, unsigned int data_offset)
3757 {
3758         unsigned int elements = qeth_get_elements_for_frags(skb);
3759         addr_t end = (addr_t)skb->data + skb_headlen(skb);
3760         addr_t start = (addr_t)skb->data + data_offset;
3761
3762         if (start != end)
3763                 elements += qeth_get_elements_for_range(start, end);
3764         return elements;
3765 }
3766 EXPORT_SYMBOL_GPL(qeth_count_elements);
3767
3768 #define QETH_HDR_CACHE_OBJ_SIZE         (sizeof(struct qeth_hdr_tso) + \
3769                                          MAX_TCP_HEADER)
3770
3771 /**
3772  * qeth_add_hw_header() - add a HW header to an skb.
3773  * @skb: skb that the HW header should be added to.
3774  * @hdr: double pointer to a qeth_hdr. When returning with >= 0,
3775  *       it contains a valid pointer to a qeth_hdr.
3776  * @hdr_len: length of the HW header.
3777  * @proto_len: length of protocol headers that need to be in same page as the
3778  *             HW header.
3779  *
3780  * Returns the pushed length. If the header can't be pushed on
3781  * (eg. because it would cross a page boundary), it is allocated from
3782  * the cache instead and 0 is returned.
3783  * The number of needed buffer elements is returned in @elements.
3784  * Error to create the hdr is indicated by returning with < 0.
3785  */
3786 static int qeth_add_hw_header(struct qeth_card *card, struct sk_buff *skb,
3787                               struct qeth_hdr **hdr, unsigned int hdr_len,
3788                               unsigned int proto_len, unsigned int *elements)
3789 {
3790         const unsigned int max_elements = QETH_MAX_BUFFER_ELEMENTS(card);
3791         const unsigned int contiguous = proto_len ? proto_len : 1;
3792         unsigned int __elements;
3793         addr_t start, end;
3794         bool push_ok;
3795         int rc;
3796
3797 check_layout:
3798         start = (addr_t)skb->data - hdr_len;
3799         end = (addr_t)skb->data;
3800
3801         if (qeth_get_elements_for_range(start, end + contiguous) == 1) {
3802                 /* Push HW header into same page as first protocol header. */
3803                 push_ok = true;
3804                 /* ... but TSO always needs a separate element for headers: */
3805                 if (skb_is_gso(skb))
3806                         __elements = 1 + qeth_count_elements(skb, proto_len);
3807                 else
3808                         __elements = qeth_count_elements(skb, 0);
3809         } else if (!proto_len && qeth_get_elements_for_range(start, end) == 1) {
3810                 /* Push HW header into a new page. */
3811                 push_ok = true;
3812                 __elements = 1 + qeth_count_elements(skb, 0);
3813         } else {
3814                 /* Use header cache, copy protocol headers up. */
3815                 push_ok = false;
3816                 __elements = 1 + qeth_count_elements(skb, proto_len);
3817         }
3818
3819         /* Compress skb to fit into one IO buffer: */
3820         if (__elements > max_elements) {
3821                 if (!skb_is_nonlinear(skb)) {
3822                         /* Drop it, no easy way of shrinking it further. */
3823                         QETH_DBF_MESSAGE(2, "Dropped an oversized skb (Max Elements=%u / Actual=%u / Length=%u).\n",
3824                                          max_elements, __elements, skb->len);
3825                         return -E2BIG;
3826                 }
3827
3828                 rc = skb_linearize(skb);
3829                 if (card->options.performance_stats) {
3830                         if (rc)
3831                                 card->perf_stats.tx_linfail++;
3832                         else
3833                                 card->perf_stats.tx_lin++;
3834                 }
3835                 if (rc)
3836                         return rc;
3837
3838                 /* Linearization changed the layout, re-evaluate: */
3839                 goto check_layout;
3840         }
3841
3842         *elements = __elements;
3843         /* Add the header: */
3844         if (push_ok) {
3845                 *hdr = skb_push(skb, hdr_len);
3846                 return hdr_len;
3847         }
3848         /* fall back */
3849         if (hdr_len + proto_len > QETH_HDR_CACHE_OBJ_SIZE)
3850                 return -E2BIG;
3851         *hdr = kmem_cache_alloc(qeth_core_header_cache, GFP_ATOMIC);
3852         if (!*hdr)
3853                 return -ENOMEM;
3854         /* Copy protocol headers behind HW header: */
3855         skb_copy_from_linear_data(skb, ((char *)*hdr) + hdr_len, proto_len);
3856         return 0;
3857 }
3858
3859 static void __qeth_fill_buffer(struct sk_buff *skb,
3860                                struct qeth_qdio_out_buffer *buf,
3861                                bool is_first_elem, unsigned int offset)
3862 {
3863         struct qdio_buffer *buffer = buf->buffer;
3864         int element = buf->next_element_to_fill;
3865         int length = skb_headlen(skb) - offset;
3866         char *data = skb->data + offset;
3867         int length_here, cnt;
3868
3869         /* map linear part into buffer element(s) */
3870         while (length > 0) {
3871                 /* length_here is the remaining amount of data in this page */
3872                 length_here = PAGE_SIZE - ((unsigned long) data % PAGE_SIZE);
3873                 if (length < length_here)
3874                         length_here = length;
3875
3876                 buffer->element[element].addr = data;
3877                 buffer->element[element].length = length_here;
3878                 length -= length_here;
3879                 if (is_first_elem) {
3880                         is_first_elem = false;
3881                         if (length || skb_is_nonlinear(skb))
3882                                 /* skb needs additional elements */
3883                                 buffer->element[element].eflags =
3884                                         SBAL_EFLAGS_FIRST_FRAG;
3885                         else
3886                                 buffer->element[element].eflags = 0;
3887                 } else {
3888                         buffer->element[element].eflags =
3889                                 SBAL_EFLAGS_MIDDLE_FRAG;
3890                 }
3891                 data += length_here;
3892                 element++;
3893         }
3894
3895         /* map page frags into buffer element(s) */
3896         for (cnt = 0; cnt < skb_shinfo(skb)->nr_frags; cnt++) {
3897                 skb_frag_t *frag = &skb_shinfo(skb)->frags[cnt];
3898
3899                 data = skb_frag_address(frag);
3900                 length = skb_frag_size(frag);
3901                 while (length > 0) {
3902                         length_here = PAGE_SIZE -
3903                                 ((unsigned long) data % PAGE_SIZE);
3904                         if (length < length_here)
3905                                 length_here = length;
3906
3907                         buffer->element[element].addr = data;
3908                         buffer->element[element].length = length_here;
3909                         buffer->element[element].eflags =
3910                                 SBAL_EFLAGS_MIDDLE_FRAG;
3911                         length -= length_here;
3912                         data += length_here;
3913                         element++;
3914                 }
3915         }
3916
3917         if (buffer->element[element - 1].eflags)
3918                 buffer->element[element - 1].eflags = SBAL_EFLAGS_LAST_FRAG;
3919         buf->next_element_to_fill = element;
3920 }
3921
3922 /**
3923  * qeth_fill_buffer() - map skb into an output buffer
3924  * @queue:      QDIO queue to submit the buffer on
3925  * @buf:        buffer to transport the skb
3926  * @skb:        skb to map into the buffer
3927  * @hdr:        qeth_hdr for this skb. Either at skb->data, or allocated
3928  *              from qeth_core_header_cache.
3929  * @offset:     when mapping the skb, start at skb->data + offset
3930  * @hd_len:     if > 0, build a dedicated header element of this size
3931  */
3932 static int qeth_fill_buffer(struct qeth_qdio_out_q *queue,
3933                             struct qeth_qdio_out_buffer *buf,
3934                             struct sk_buff *skb, struct qeth_hdr *hdr,
3935                             unsigned int offset, unsigned int hd_len)
3936 {
3937         struct qdio_buffer *buffer = buf->buffer;
3938         bool is_first_elem = true;
3939
3940         __skb_queue_tail(&buf->skb_list, skb);
3941
3942         /* build dedicated header element */
3943         if (hd_len) {
3944                 int element = buf->next_element_to_fill;
3945                 is_first_elem = false;
3946
3947                 buffer->element[element].addr = hdr;
3948                 buffer->element[element].length = hd_len;
3949                 buffer->element[element].eflags = SBAL_EFLAGS_FIRST_FRAG;
3950                 /* remember to free cache-allocated qeth_hdr: */
3951                 buf->is_header[element] = ((void *)hdr != skb->data);
3952                 buf->next_element_to_fill++;
3953         }
3954
3955         __qeth_fill_buffer(skb, buf, is_first_elem, offset);
3956
3957         if (!queue->do_pack) {
3958                 QETH_CARD_TEXT(queue->card, 6, "fillbfnp");
3959         } else {
3960                 QETH_CARD_TEXT(queue->card, 6, "fillbfpa");
3961                 if (queue->card->options.performance_stats)
3962                         queue->card->perf_stats.skbs_sent_pack++;
3963
3964                 /* If the buffer still has free elements, keep using it. */
3965                 if (buf->next_element_to_fill <
3966                     QETH_MAX_BUFFER_ELEMENTS(queue->card))
3967                         return 0;
3968         }
3969
3970         /* flush out the buffer */
3971         atomic_set(&buf->state, QETH_QDIO_BUF_PRIMED);
3972         queue->next_buf_to_fill = (queue->next_buf_to_fill + 1) %
3973                                   QDIO_MAX_BUFFERS_PER_Q;
3974         return 1;
3975 }
3976
3977 static int qeth_do_send_packet_fast(struct qeth_qdio_out_q *queue,
3978                                     struct sk_buff *skb, struct qeth_hdr *hdr,
3979                                     unsigned int offset, unsigned int hd_len)
3980 {
3981         int index = queue->next_buf_to_fill;
3982         struct qeth_qdio_out_buffer *buffer = queue->bufs[index];
3983
3984         /*
3985          * check if buffer is empty to make sure that we do not 'overtake'
3986          * ourselves and try to fill a buffer that is already primed
3987          */
3988         if (atomic_read(&buffer->state) != QETH_QDIO_BUF_EMPTY)
3989                 return -EBUSY;
3990         qeth_fill_buffer(queue, buffer, skb, hdr, offset, hd_len);
3991         qeth_flush_buffers(queue, index, 1);
3992         return 0;
3993 }
3994
3995 int qeth_do_send_packet(struct qeth_card *card, struct qeth_qdio_out_q *queue,
3996                         struct sk_buff *skb, struct qeth_hdr *hdr,
3997                         unsigned int offset, unsigned int hd_len,
3998                         int elements_needed)
3999 {
4000         struct qeth_qdio_out_buffer *buffer;
4001         int start_index;
4002         int flush_count = 0;
4003         int do_pack = 0;
4004         int tmp;
4005         int rc = 0;
4006
4007         /* spin until we get the queue ... */
4008         while (atomic_cmpxchg(&queue->state, QETH_OUT_Q_UNLOCKED,
4009                               QETH_OUT_Q_LOCKED) != QETH_OUT_Q_UNLOCKED);
4010         start_index = queue->next_buf_to_fill;
4011         buffer = queue->bufs[queue->next_buf_to_fill];
4012         /*
4013          * check if buffer is empty to make sure that we do not 'overtake'
4014          * ourselves and try to fill a buffer that is already primed
4015          */
4016         if (atomic_read(&buffer->state) != QETH_QDIO_BUF_EMPTY) {
4017                 atomic_set(&queue->state, QETH_OUT_Q_UNLOCKED);
4018                 return -EBUSY;
4019         }
4020         /* check if we need to switch packing state of this queue */
4021         qeth_switch_to_packing_if_needed(queue);
4022         if (queue->do_pack) {
4023                 do_pack = 1;
4024                 /* does packet fit in current buffer? */
4025                 if ((QETH_MAX_BUFFER_ELEMENTS(card) -
4026                     buffer->next_element_to_fill) < elements_needed) {
4027                         /* ... no -> set state PRIMED */
4028                         atomic_set(&buffer->state, QETH_QDIO_BUF_PRIMED);
4029                         flush_count++;
4030                         queue->next_buf_to_fill =
4031                                 (queue->next_buf_to_fill + 1) %
4032                                 QDIO_MAX_BUFFERS_PER_Q;
4033                         buffer = queue->bufs[queue->next_buf_to_fill];
4034                         /* we did a step forward, so check buffer state
4035                          * again */
4036                         if (atomic_read(&buffer->state) !=
4037                             QETH_QDIO_BUF_EMPTY) {
4038                                 qeth_flush_buffers(queue, start_index,
4039                                                            flush_count);
4040                                 atomic_set(&queue->state,
4041                                                 QETH_OUT_Q_UNLOCKED);
4042                                 rc = -EBUSY;
4043                                 goto out;
4044                         }
4045                 }
4046         }
4047
4048         flush_count += qeth_fill_buffer(queue, buffer, skb, hdr, offset,
4049                                         hd_len);
4050         if (flush_count)
4051                 qeth_flush_buffers(queue, start_index, flush_count);
4052         else if (!atomic_read(&queue->set_pci_flags_count))
4053                 atomic_xchg(&queue->state, QETH_OUT_Q_LOCKED_FLUSH);
4054         /*
4055          * queue->state will go from LOCKED -> UNLOCKED or from
4056          * LOCKED_FLUSH -> LOCKED if output_handler wanted to 'notify' us
4057          * (switch packing state or flush buffer to get another pci flag out).
4058          * In that case we will enter this loop
4059          */
4060         while (atomic_dec_return(&queue->state)) {
4061                 start_index = queue->next_buf_to_fill;
4062                 /* check if we can go back to non-packing state */
4063                 tmp = qeth_switch_to_nonpacking_if_needed(queue);
4064                 /*
4065                  * check if we need to flush a packing buffer to get a pci
4066                  * flag out on the queue
4067                  */
4068                 if (!tmp && !atomic_read(&queue->set_pci_flags_count))
4069                         tmp = qeth_prep_flush_pack_buffer(queue);
4070                 if (tmp) {
4071                         qeth_flush_buffers(queue, start_index, tmp);
4072                         flush_count += tmp;
4073                 }
4074         }
4075 out:
4076         /* at this point the queue is UNLOCKED again */
4077         if (queue->card->options.performance_stats && do_pack)
4078                 queue->card->perf_stats.bufs_sent_pack += flush_count;
4079
4080         return rc;
4081 }
4082 EXPORT_SYMBOL_GPL(qeth_do_send_packet);
4083
4084 static void qeth_fill_tso_ext(struct qeth_hdr_tso *hdr,
4085                               unsigned int payload_len, struct sk_buff *skb,
4086                               unsigned int proto_len)
4087 {
4088         struct qeth_hdr_ext_tso *ext = &hdr->ext;
4089
4090         ext->hdr_tot_len = sizeof(*ext);
4091         ext->imb_hdr_no = 1;
4092         ext->hdr_type = 1;
4093         ext->hdr_version = 1;
4094         ext->hdr_len = 28;
4095         ext->payload_len = payload_len;
4096         ext->mss = skb_shinfo(skb)->gso_size;
4097         ext->dg_hdr_len = proto_len;
4098 }
4099
4100 int qeth_xmit(struct qeth_card *card, struct sk_buff *skb,
4101               struct qeth_qdio_out_q *queue, int ipv, int cast_type,
4102               void (*fill_header)(struct qeth_card *card, struct qeth_hdr *hdr,
4103                                   struct sk_buff *skb, int ipv, int cast_type,
4104                                   unsigned int data_len))
4105 {
4106         unsigned int proto_len, hw_hdr_len;
4107         unsigned int frame_len = skb->len;
4108         bool is_tso = skb_is_gso(skb);
4109         unsigned int data_offset = 0;
4110         struct qeth_hdr *hdr = NULL;
4111         unsigned int hd_len = 0;
4112         unsigned int elements;
4113         int push_len, rc;
4114         bool is_sg;
4115
4116         if (is_tso) {
4117                 hw_hdr_len = sizeof(struct qeth_hdr_tso);
4118                 proto_len = skb_transport_offset(skb) + tcp_hdrlen(skb);
4119         } else {
4120                 hw_hdr_len = sizeof(struct qeth_hdr);
4121                 proto_len = (IS_IQD(card) && IS_LAYER2(card)) ? ETH_HLEN : 0;
4122         }
4123
4124         rc = skb_cow_head(skb, hw_hdr_len);
4125         if (rc)
4126                 return rc;
4127
4128         push_len = qeth_add_hw_header(card, skb, &hdr, hw_hdr_len, proto_len,
4129                                       &elements);
4130         if (push_len < 0)
4131                 return push_len;
4132         if (is_tso || !push_len) {
4133                 /* HW header needs its own buffer element. */
4134                 hd_len = hw_hdr_len + proto_len;
4135                 data_offset = push_len + proto_len;
4136         }
4137         memset(hdr, 0, hw_hdr_len);
4138         fill_header(card, hdr, skb, ipv, cast_type, frame_len);
4139         if (is_tso)
4140                 qeth_fill_tso_ext((struct qeth_hdr_tso *) hdr,
4141                                   frame_len - proto_len, skb, proto_len);
4142
4143         is_sg = skb_is_nonlinear(skb);
4144         if (IS_IQD(card)) {
4145                 rc = qeth_do_send_packet_fast(queue, skb, hdr, data_offset,
4146                                               hd_len);
4147         } else {
4148                 /* TODO: drop skb_orphan() once TX completion is fast enough */
4149                 skb_orphan(skb);
4150                 rc = qeth_do_send_packet(card, queue, skb, hdr, data_offset,
4151                                          hd_len, elements);
4152         }
4153
4154         if (!rc) {
4155                 if (card->options.performance_stats) {
4156                         card->perf_stats.buf_elements_sent += elements;
4157                         if (is_sg)
4158                                 card->perf_stats.sg_skbs_sent++;
4159                         if (is_tso) {
4160                                 card->perf_stats.large_send_bytes += frame_len;
4161                                 card->perf_stats.large_send_cnt++;
4162                         }
4163                 }
4164         } else {
4165                 if (!push_len)
4166                         kmem_cache_free(qeth_core_header_cache, hdr);
4167                 if (rc == -EBUSY)
4168                         /* roll back to ETH header */
4169                         skb_pull(skb, push_len);
4170         }
4171         return rc;
4172 }
4173 EXPORT_SYMBOL_GPL(qeth_xmit);
4174
4175 static int qeth_setadp_promisc_mode_cb(struct qeth_card *card,
4176                 struct qeth_reply *reply, unsigned long data)
4177 {
4178         struct qeth_ipa_cmd *cmd = (struct qeth_ipa_cmd *) data;
4179         struct qeth_ipacmd_setadpparms *setparms;
4180
4181         QETH_CARD_TEXT(card, 4, "prmadpcb");
4182
4183         setparms = &(cmd->data.setadapterparms);
4184         if (qeth_setadpparms_inspect_rc(cmd)) {
4185                 QETH_CARD_TEXT_(card, 4, "prmrc%x", cmd->hdr.return_code);
4186                 setparms->data.mode = SET_PROMISC_MODE_OFF;
4187         }
4188         card->info.promisc_mode = setparms->data.mode;
4189         return 0;
4190 }
4191
4192 void qeth_setadp_promisc_mode(struct qeth_card *card)
4193 {
4194         enum qeth_ipa_promisc_modes mode;
4195         struct net_device *dev = card->dev;
4196         struct qeth_cmd_buffer *iob;
4197         struct qeth_ipa_cmd *cmd;
4198
4199         QETH_CARD_TEXT(card, 4, "setprom");
4200
4201         if (((dev->flags & IFF_PROMISC) &&
4202              (card->info.promisc_mode == SET_PROMISC_MODE_ON)) ||
4203             (!(dev->flags & IFF_PROMISC) &&
4204              (card->info.promisc_mode == SET_PROMISC_MODE_OFF)))
4205                 return;
4206         mode = SET_PROMISC_MODE_OFF;
4207         if (dev->flags & IFF_PROMISC)
4208                 mode = SET_PROMISC_MODE_ON;
4209         QETH_CARD_TEXT_(card, 4, "mode:%x", mode);
4210
4211         iob = qeth_get_adapter_cmd(card, IPA_SETADP_SET_PROMISC_MODE,
4212                         sizeof(struct qeth_ipacmd_setadpparms_hdr) + 8);
4213         if (!iob)
4214                 return;
4215         cmd = __ipa_cmd(iob);
4216         cmd->data.setadapterparms.data.mode = mode;
4217         qeth_send_ipa_cmd(card, iob, qeth_setadp_promisc_mode_cb, NULL);
4218 }
4219 EXPORT_SYMBOL_GPL(qeth_setadp_promisc_mode);
4220
4221 struct net_device_stats *qeth_get_stats(struct net_device *dev)
4222 {
4223         struct qeth_card *card;
4224
4225         card = dev->ml_priv;
4226
4227         QETH_CARD_TEXT(card, 5, "getstat");
4228
4229         return &card->stats;
4230 }
4231 EXPORT_SYMBOL_GPL(qeth_get_stats);
4232
4233 static int qeth_setadpparms_change_macaddr_cb(struct qeth_card *card,
4234                 struct qeth_reply *reply, unsigned long data)
4235 {
4236         struct qeth_ipa_cmd *cmd = (struct qeth_ipa_cmd *) data;
4237         struct qeth_ipacmd_setadpparms *adp_cmd;
4238
4239         QETH_CARD_TEXT(card, 4, "chgmaccb");
4240         if (qeth_setadpparms_inspect_rc(cmd))
4241                 return 0;
4242
4243         adp_cmd = &cmd->data.setadapterparms;
4244         if (IS_LAYER2(card) && IS_OSD(card) && !IS_VM_NIC(card) &&
4245             !(adp_cmd->hdr.flags & QETH_SETADP_FLAGS_VIRTUAL_MAC))
4246                 return 0;
4247
4248         ether_addr_copy(card->dev->dev_addr, adp_cmd->data.change_addr.addr);
4249         return 0;
4250 }
4251
4252 int qeth_setadpparms_change_macaddr(struct qeth_card *card)
4253 {
4254         int rc;
4255         struct qeth_cmd_buffer *iob;
4256         struct qeth_ipa_cmd *cmd;
4257
4258         QETH_CARD_TEXT(card, 4, "chgmac");
4259
4260         iob = qeth_get_adapter_cmd(card, IPA_SETADP_ALTER_MAC_ADDRESS,
4261                                    sizeof(struct qeth_ipacmd_setadpparms_hdr) +
4262                                    sizeof(struct qeth_change_addr));
4263         if (!iob)
4264                 return -ENOMEM;
4265         cmd = __ipa_cmd(iob);
4266         cmd->data.setadapterparms.data.change_addr.cmd = CHANGE_ADDR_READ_MAC;
4267         cmd->data.setadapterparms.data.change_addr.addr_size = ETH_ALEN;
4268         ether_addr_copy(cmd->data.setadapterparms.data.change_addr.addr,
4269                         card->dev->dev_addr);
4270         rc = qeth_send_ipa_cmd(card, iob, qeth_setadpparms_change_macaddr_cb,
4271                                NULL);
4272         return rc;
4273 }
4274 EXPORT_SYMBOL_GPL(qeth_setadpparms_change_macaddr);
4275
4276 static int qeth_setadpparms_set_access_ctrl_cb(struct qeth_card *card,
4277                 struct qeth_reply *reply, unsigned long data)
4278 {
4279         struct qeth_ipa_cmd *cmd = (struct qeth_ipa_cmd *) data;
4280         struct qeth_set_access_ctrl *access_ctrl_req;
4281         int fallback = *(int *)reply->param;
4282
4283         QETH_CARD_TEXT(card, 4, "setaccb");
4284         if (cmd->hdr.return_code)
4285                 return 0;
4286         qeth_setadpparms_inspect_rc(cmd);
4287
4288         access_ctrl_req = &cmd->data.setadapterparms.data.set_access_ctrl;
4289         QETH_DBF_TEXT_(SETUP, 2, "setaccb");
4290         QETH_DBF_TEXT_(SETUP, 2, "%s", card->gdev->dev.kobj.name);
4291         QETH_DBF_TEXT_(SETUP, 2, "rc=%d",
4292                 cmd->data.setadapterparms.hdr.return_code);
4293         if (cmd->data.setadapterparms.hdr.return_code !=
4294                                                 SET_ACCESS_CTRL_RC_SUCCESS)
4295                 QETH_DBF_MESSAGE(3, "ERR:SET_ACCESS_CTRL(%#x) on device %x: %#x\n",
4296                                  access_ctrl_req->subcmd_code, CARD_DEVID(card),
4297                                  cmd->data.setadapterparms.hdr.return_code);
4298         switch (cmd->data.setadapterparms.hdr.return_code) {
4299         case SET_ACCESS_CTRL_RC_SUCCESS:
4300                 if (card->options.isolation == ISOLATION_MODE_NONE) {
4301                         dev_info(&card->gdev->dev,
4302                             "QDIO data connection isolation is deactivated\n");
4303                 } else {
4304                         dev_info(&card->gdev->dev,
4305                             "QDIO data connection isolation is activated\n");
4306                 }
4307                 break;
4308         case SET_ACCESS_CTRL_RC_ALREADY_NOT_ISOLATED:
4309                 QETH_DBF_MESSAGE(2, "QDIO data connection isolation on device %x already deactivated\n",
4310                                  CARD_DEVID(card));
4311                 if (fallback)
4312                         card->options.isolation = card->options.prev_isolation;
4313                 break;
4314         case SET_ACCESS_CTRL_RC_ALREADY_ISOLATED:
4315                 QETH_DBF_MESSAGE(2, "QDIO data connection isolation on device %x already activated\n",
4316                                  CARD_DEVID(card));
4317                 if (fallback)
4318                         card->options.isolation = card->options.prev_isolation;
4319                 break;
4320         case SET_ACCESS_CTRL_RC_NOT_SUPPORTED:
4321                 dev_err(&card->gdev->dev, "Adapter does not "
4322                         "support QDIO data connection isolation\n");
4323                 break;
4324         case SET_ACCESS_CTRL_RC_NONE_SHARED_ADAPTER:
4325                 dev_err(&card->gdev->dev,
4326                         "Adapter is dedicated. "
4327                         "QDIO data connection isolation not supported\n");
4328                 if (fallback)
4329                         card->options.isolation = card->options.prev_isolation;
4330                 break;
4331         case SET_ACCESS_CTRL_RC_ACTIVE_CHECKSUM_OFF:
4332                 dev_err(&card->gdev->dev,
4333                         "TSO does not permit QDIO data connection isolation\n");
4334                 if (fallback)
4335                         card->options.isolation = card->options.prev_isolation;
4336                 break;
4337         case SET_ACCESS_CTRL_RC_REFLREL_UNSUPPORTED:
4338                 dev_err(&card->gdev->dev, "The adjacent switch port does not "
4339                         "support reflective relay mode\n");
4340                 if (fallback)
4341                         card->options.isolation = card->options.prev_isolation;
4342                 break;
4343         case SET_ACCESS_CTRL_RC_REFLREL_FAILED:
4344                 dev_err(&card->gdev->dev, "The reflective relay mode cannot be "
4345                                         "enabled at the adjacent switch port");
4346                 if (fallback)
4347                         card->options.isolation = card->options.prev_isolation;
4348                 break;
4349         case SET_ACCESS_CTRL_RC_REFLREL_DEACT_FAILED:
4350                 dev_warn(&card->gdev->dev, "Turning off reflective relay mode "
4351                                         "at the adjacent switch failed\n");
4352                 break;
4353         default:
4354                 /* this should never happen */
4355                 if (fallback)
4356                         card->options.isolation = card->options.prev_isolation;
4357                 break;
4358         }
4359         return 0;
4360 }
4361
4362 static int qeth_setadpparms_set_access_ctrl(struct qeth_card *card,
4363                 enum qeth_ipa_isolation_modes isolation, int fallback)
4364 {
4365         int rc;
4366         struct qeth_cmd_buffer *iob;
4367         struct qeth_ipa_cmd *cmd;
4368         struct qeth_set_access_ctrl *access_ctrl_req;
4369
4370         QETH_CARD_TEXT(card, 4, "setacctl");
4371
4372         QETH_DBF_TEXT_(SETUP, 2, "setacctl");
4373         QETH_DBF_TEXT_(SETUP, 2, "%s", card->gdev->dev.kobj.name);
4374
4375         iob = qeth_get_adapter_cmd(card, IPA_SETADP_SET_ACCESS_CONTROL,
4376                                    sizeof(struct qeth_ipacmd_setadpparms_hdr) +
4377                                    sizeof(struct qeth_set_access_ctrl));
4378         if (!iob)
4379                 return -ENOMEM;
4380         cmd = __ipa_cmd(iob);
4381         access_ctrl_req = &cmd->data.setadapterparms.data.set_access_ctrl;
4382         access_ctrl_req->subcmd_code = isolation;
4383
4384         rc = qeth_send_ipa_cmd(card, iob, qeth_setadpparms_set_access_ctrl_cb,
4385                                &fallback);
4386         QETH_DBF_TEXT_(SETUP, 2, "rc=%d", rc);
4387         return rc;
4388 }
4389
4390 int qeth_set_access_ctrl_online(struct qeth_card *card, int fallback)
4391 {
4392         int rc = 0;
4393
4394         QETH_CARD_TEXT(card, 4, "setactlo");
4395
4396         if ((card->info.type == QETH_CARD_TYPE_OSD ||
4397              card->info.type == QETH_CARD_TYPE_OSX) &&
4398              qeth_adp_supported(card, IPA_SETADP_SET_ACCESS_CONTROL)) {
4399                 rc = qeth_setadpparms_set_access_ctrl(card,
4400                         card->options.isolation, fallback);
4401                 if (rc) {
4402                         QETH_DBF_MESSAGE(3, "IPA(SET_ACCESS_CTRL(%d) on device %x: sent failed\n",
4403                                          rc, CARD_DEVID(card));
4404                         rc = -EOPNOTSUPP;
4405                 }
4406         } else if (card->options.isolation != ISOLATION_MODE_NONE) {
4407                 card->options.isolation = ISOLATION_MODE_NONE;
4408
4409                 dev_err(&card->gdev->dev, "Adapter does not "
4410                         "support QDIO data connection isolation\n");
4411                 rc = -EOPNOTSUPP;
4412         }
4413         return rc;
4414 }
4415 EXPORT_SYMBOL_GPL(qeth_set_access_ctrl_online);
4416
4417 void qeth_tx_timeout(struct net_device *dev)
4418 {
4419         struct qeth_card *card;
4420
4421         card = dev->ml_priv;
4422         QETH_CARD_TEXT(card, 4, "txtimeo");
4423         card->stats.tx_errors++;
4424         qeth_schedule_recovery(card);
4425 }
4426 EXPORT_SYMBOL_GPL(qeth_tx_timeout);
4427
4428 static int qeth_mdio_read(struct net_device *dev, int phy_id, int regnum)
4429 {
4430         struct qeth_card *card = dev->ml_priv;
4431         int rc = 0;
4432
4433         switch (regnum) {
4434         case MII_BMCR: /* Basic mode control register */
4435                 rc = BMCR_FULLDPLX;
4436                 if ((card->info.link_type != QETH_LINK_TYPE_GBIT_ETH) &&
4437                     (card->info.link_type != QETH_LINK_TYPE_OSN) &&
4438                     (card->info.link_type != QETH_LINK_TYPE_10GBIT_ETH) &&
4439                     (card->info.link_type != QETH_LINK_TYPE_25GBIT_ETH))
4440                         rc |= BMCR_SPEED100;
4441                 break;
4442         case MII_BMSR: /* Basic mode status register */
4443                 rc = BMSR_ERCAP | BMSR_ANEGCOMPLETE | BMSR_LSTATUS |
4444                      BMSR_10HALF | BMSR_10FULL | BMSR_100HALF | BMSR_100FULL |
4445                      BMSR_100BASE4;
4446                 break;
4447         case MII_PHYSID1: /* PHYS ID 1 */
4448                 rc = (dev->dev_addr[0] << 16) | (dev->dev_addr[1] << 8) |
4449                      dev->dev_addr[2];
4450                 rc = (rc >> 5) & 0xFFFF;
4451                 break;
4452         case MII_PHYSID2: /* PHYS ID 2 */
4453                 rc = (dev->dev_addr[2] << 10) & 0xFFFF;
4454                 break;
4455         case MII_ADVERTISE: /* Advertisement control reg */
4456                 rc = ADVERTISE_ALL;
4457                 break;
4458         case MII_LPA: /* Link partner ability reg */
4459                 rc = LPA_10HALF | LPA_10FULL | LPA_100HALF | LPA_100FULL |
4460                      LPA_100BASE4 | LPA_LPACK;
4461                 break;
4462         case MII_EXPANSION: /* Expansion register */
4463                 break;
4464         case MII_DCOUNTER: /* disconnect counter */
4465                 break;
4466         case MII_FCSCOUNTER: /* false carrier counter */
4467                 break;
4468         case MII_NWAYTEST: /* N-way auto-neg test register */
4469                 break;
4470         case MII_RERRCOUNTER: /* rx error counter */
4471                 rc = card->stats.rx_errors;
4472                 break;
4473         case MII_SREVISION: /* silicon revision */
4474                 break;
4475         case MII_RESV1: /* reserved 1 */
4476                 break;
4477         case MII_LBRERROR: /* loopback, rx, bypass error */
4478                 break;
4479         case MII_PHYADDR: /* physical address */
4480                 break;
4481         case MII_RESV2: /* reserved 2 */
4482                 break;
4483         case MII_TPISTATUS: /* TPI status for 10mbps */
4484                 break;
4485         case MII_NCONFIG: /* network interface config */
4486                 break;
4487         default:
4488                 break;
4489         }
4490         return rc;
4491 }
4492
4493 static int qeth_snmp_command_cb(struct qeth_card *card,
4494                 struct qeth_reply *reply, unsigned long sdata)
4495 {
4496         struct qeth_ipa_cmd *cmd;
4497         struct qeth_arp_query_info *qinfo;
4498         unsigned char *data;
4499         void *snmp_data;
4500         __u16 data_len;
4501
4502         QETH_CARD_TEXT(card, 3, "snpcmdcb");
4503
4504         cmd = (struct qeth_ipa_cmd *) sdata;
4505         data = (unsigned char *)((char *)cmd - reply->offset);
4506         qinfo = (struct qeth_arp_query_info *) reply->param;
4507
4508         if (cmd->hdr.return_code) {
4509                 QETH_CARD_TEXT_(card, 4, "scer1%x", cmd->hdr.return_code);
4510                 return 0;
4511         }
4512         if (cmd->data.setadapterparms.hdr.return_code) {
4513                 cmd->hdr.return_code =
4514                         cmd->data.setadapterparms.hdr.return_code;
4515                 QETH_CARD_TEXT_(card, 4, "scer2%x", cmd->hdr.return_code);
4516                 return 0;
4517         }
4518         data_len = *((__u16 *)QETH_IPA_PDU_LEN_PDU1(data));
4519         if (cmd->data.setadapterparms.hdr.seq_no == 1) {
4520                 snmp_data = &cmd->data.setadapterparms.data.snmp;
4521                 data_len -= offsetof(struct qeth_ipa_cmd,
4522                                      data.setadapterparms.data.snmp);
4523         } else {
4524                 snmp_data = &cmd->data.setadapterparms.data.snmp.request;
4525                 data_len -= offsetof(struct qeth_ipa_cmd,
4526                                      data.setadapterparms.data.snmp.request);
4527         }
4528
4529         /* check if there is enough room in userspace */
4530         if ((qinfo->udata_len - qinfo->udata_offset) < data_len) {
4531                 QETH_CARD_TEXT_(card, 4, "scer3%i", -ENOMEM);
4532                 cmd->hdr.return_code = IPA_RC_ENOMEM;
4533                 return 0;
4534         }
4535         QETH_CARD_TEXT_(card, 4, "snore%i",
4536                        cmd->data.setadapterparms.hdr.used_total);
4537         QETH_CARD_TEXT_(card, 4, "sseqn%i",
4538                 cmd->data.setadapterparms.hdr.seq_no);
4539         /*copy entries to user buffer*/
4540         memcpy(qinfo->udata + qinfo->udata_offset, snmp_data, data_len);
4541         qinfo->udata_offset += data_len;
4542
4543         /* check if all replies received ... */
4544                 QETH_CARD_TEXT_(card, 4, "srtot%i",
4545                                cmd->data.setadapterparms.hdr.used_total);
4546                 QETH_CARD_TEXT_(card, 4, "srseq%i",
4547                                cmd->data.setadapterparms.hdr.seq_no);
4548         if (cmd->data.setadapterparms.hdr.seq_no <
4549             cmd->data.setadapterparms.hdr.used_total)
4550                 return 1;
4551         return 0;
4552 }
4553
4554 static int qeth_snmp_command(struct qeth_card *card, char __user *udata)
4555 {
4556         struct qeth_cmd_buffer *iob;
4557         struct qeth_ipa_cmd *cmd;
4558         struct qeth_snmp_ureq *ureq;
4559         unsigned int req_len;
4560         struct qeth_arp_query_info qinfo = {0, };
4561         int rc = 0;
4562
4563         QETH_CARD_TEXT(card, 3, "snmpcmd");
4564
4565         if (card->info.guestlan)
4566                 return -EOPNOTSUPP;
4567
4568         if ((!qeth_adp_supported(card, IPA_SETADP_SET_SNMP_CONTROL)) &&
4569             IS_LAYER3(card))
4570                 return -EOPNOTSUPP;
4571
4572         /* skip 4 bytes (data_len struct member) to get req_len */
4573         if (copy_from_user(&req_len, udata + sizeof(int), sizeof(int)))
4574                 return -EFAULT;
4575         if (req_len > (QETH_BUFSIZE - IPA_PDU_HEADER_SIZE -
4576                        sizeof(struct qeth_ipacmd_hdr) -
4577                        sizeof(struct qeth_ipacmd_setadpparms_hdr)))
4578                 return -EINVAL;
4579         ureq = memdup_user(udata, req_len + sizeof(struct qeth_snmp_ureq_hdr));
4580         if (IS_ERR(ureq)) {
4581                 QETH_CARD_TEXT(card, 2, "snmpnome");
4582                 return PTR_ERR(ureq);
4583         }
4584         qinfo.udata_len = ureq->hdr.data_len;
4585         qinfo.udata = kzalloc(qinfo.udata_len, GFP_KERNEL);
4586         if (!qinfo.udata) {
4587                 kfree(ureq);
4588                 return -ENOMEM;
4589         }
4590         qinfo.udata_offset = sizeof(struct qeth_snmp_ureq_hdr);
4591
4592         iob = qeth_get_adapter_cmd(card, IPA_SETADP_SET_SNMP_CONTROL,
4593                                    QETH_SNMP_SETADP_CMDLENGTH + req_len);
4594         if (!iob) {
4595                 rc = -ENOMEM;
4596                 goto out;
4597         }
4598
4599         /* for large requests, fix-up the length fields: */
4600         qeth_prepare_ipa_cmd(card, iob, QETH_SETADP_BASE_LEN + req_len);
4601
4602         cmd = __ipa_cmd(iob);
4603         memcpy(&cmd->data.setadapterparms.data.snmp, &ureq->cmd, req_len);
4604         rc = qeth_send_ipa_cmd(card, iob, qeth_snmp_command_cb, &qinfo);
4605         if (rc)
4606                 QETH_DBF_MESSAGE(2, "SNMP command failed on device %x: (%#x)\n",
4607                                  CARD_DEVID(card), rc);
4608         else {
4609                 if (copy_to_user(udata, qinfo.udata, qinfo.udata_len))
4610                         rc = -EFAULT;
4611         }
4612 out:
4613         kfree(ureq);
4614         kfree(qinfo.udata);
4615         return rc;
4616 }
4617
4618 static int qeth_setadpparms_query_oat_cb(struct qeth_card *card,
4619                 struct qeth_reply *reply, unsigned long data)
4620 {
4621         struct qeth_ipa_cmd *cmd = (struct qeth_ipa_cmd *)data;
4622         struct qeth_qoat_priv *priv;
4623         char *resdata;
4624         int resdatalen;
4625
4626         QETH_CARD_TEXT(card, 3, "qoatcb");
4627         if (qeth_setadpparms_inspect_rc(cmd))
4628                 return 0;
4629
4630         priv = (struct qeth_qoat_priv *)reply->param;
4631         resdatalen = cmd->data.setadapterparms.hdr.cmdlength;
4632         resdata = (char *)data + 28;
4633
4634         if (resdatalen > (priv->buffer_len - priv->response_len)) {
4635                 cmd->hdr.return_code = IPA_RC_FFFF;
4636                 return 0;
4637         }
4638
4639         memcpy((priv->buffer + priv->response_len), resdata,
4640                 resdatalen);
4641         priv->response_len += resdatalen;
4642
4643         if (cmd->data.setadapterparms.hdr.seq_no <
4644             cmd->data.setadapterparms.hdr.used_total)
4645                 return 1;
4646         return 0;
4647 }
4648
4649 static int qeth_query_oat_command(struct qeth_card *card, char __user *udata)
4650 {
4651         int rc = 0;
4652         struct qeth_cmd_buffer *iob;
4653         struct qeth_ipa_cmd *cmd;
4654         struct qeth_query_oat *oat_req;
4655         struct qeth_query_oat_data oat_data;
4656         struct qeth_qoat_priv priv;
4657         void __user *tmp;
4658
4659         QETH_CARD_TEXT(card, 3, "qoatcmd");
4660
4661         if (!qeth_adp_supported(card, IPA_SETADP_QUERY_OAT)) {
4662                 rc = -EOPNOTSUPP;
4663                 goto out;
4664         }
4665
4666         if (copy_from_user(&oat_data, udata,
4667             sizeof(struct qeth_query_oat_data))) {
4668                         rc = -EFAULT;
4669                         goto out;
4670         }
4671
4672         priv.buffer_len = oat_data.buffer_len;
4673         priv.response_len = 0;
4674         priv.buffer = vzalloc(oat_data.buffer_len);
4675         if (!priv.buffer) {
4676                 rc = -ENOMEM;
4677                 goto out;
4678         }
4679
4680         iob = qeth_get_adapter_cmd(card, IPA_SETADP_QUERY_OAT,
4681                                    sizeof(struct qeth_ipacmd_setadpparms_hdr) +
4682                                    sizeof(struct qeth_query_oat));
4683         if (!iob) {
4684                 rc = -ENOMEM;
4685                 goto out_free;
4686         }
4687         cmd = __ipa_cmd(iob);
4688         oat_req = &cmd->data.setadapterparms.data.query_oat;
4689         oat_req->subcmd_code = oat_data.command;
4690
4691         rc = qeth_send_ipa_cmd(card, iob, qeth_setadpparms_query_oat_cb,
4692                                &priv);
4693         if (!rc) {
4694                 if (is_compat_task())
4695                         tmp = compat_ptr(oat_data.ptr);
4696                 else
4697                         tmp = (void __user *)(unsigned long)oat_data.ptr;
4698
4699                 if (copy_to_user(tmp, priv.buffer,
4700                     priv.response_len)) {
4701                         rc = -EFAULT;
4702                         goto out_free;
4703                 }
4704
4705                 oat_data.response_len = priv.response_len;
4706
4707                 if (copy_to_user(udata, &oat_data,
4708                     sizeof(struct qeth_query_oat_data)))
4709                         rc = -EFAULT;
4710         } else
4711                 if (rc == IPA_RC_FFFF)
4712                         rc = -EFAULT;
4713
4714 out_free:
4715         vfree(priv.buffer);
4716 out:
4717         return rc;
4718 }
4719
4720 static int qeth_query_card_info_cb(struct qeth_card *card,
4721                                    struct qeth_reply *reply, unsigned long data)
4722 {
4723         struct carrier_info *carrier_info = (struct carrier_info *)reply->param;
4724         struct qeth_ipa_cmd *cmd = (struct qeth_ipa_cmd *)data;
4725         struct qeth_query_card_info *card_info;
4726
4727         QETH_CARD_TEXT(card, 2, "qcrdincb");
4728         if (qeth_setadpparms_inspect_rc(cmd))
4729                 return 0;
4730
4731         card_info = &cmd->data.setadapterparms.data.card_info;
4732         carrier_info->card_type = card_info->card_type;
4733         carrier_info->port_mode = card_info->port_mode;
4734         carrier_info->port_speed = card_info->port_speed;
4735         return 0;
4736 }
4737
4738 static int qeth_query_card_info(struct qeth_card *card,
4739                                 struct carrier_info *carrier_info)
4740 {
4741         struct qeth_cmd_buffer *iob;
4742
4743         QETH_CARD_TEXT(card, 2, "qcrdinfo");
4744         if (!qeth_adp_supported(card, IPA_SETADP_QUERY_CARD_INFO))
4745                 return -EOPNOTSUPP;
4746         iob = qeth_get_adapter_cmd(card, IPA_SETADP_QUERY_CARD_INFO,
4747                 sizeof(struct qeth_ipacmd_setadpparms_hdr));
4748         if (!iob)
4749                 return -ENOMEM;
4750         return qeth_send_ipa_cmd(card, iob, qeth_query_card_info_cb,
4751                                         (void *)carrier_info);
4752 }
4753
4754 /**
4755  * qeth_vm_request_mac() - Request a hypervisor-managed MAC address
4756  * @card: pointer to a qeth_card
4757  *
4758  * Returns
4759  *      0, if a MAC address has been set for the card's netdevice
4760  *      a return code, for various error conditions
4761  */
4762 int qeth_vm_request_mac(struct qeth_card *card)
4763 {
4764         struct diag26c_mac_resp *response;
4765         struct diag26c_mac_req *request;
4766         struct ccw_dev_id id;
4767         int rc;
4768
4769         QETH_DBF_TEXT(SETUP, 2, "vmreqmac");
4770
4771         request = kzalloc(sizeof(*request), GFP_KERNEL | GFP_DMA);
4772         response = kzalloc(sizeof(*response), GFP_KERNEL | GFP_DMA);
4773         if (!request || !response) {
4774                 rc = -ENOMEM;
4775                 goto out;
4776         }
4777
4778         ccw_device_get_id(CARD_DDEV(card), &id);
4779         request->resp_buf_len = sizeof(*response);
4780         request->resp_version = DIAG26C_VERSION2;
4781         request->op_code = DIAG26C_GET_MAC;
4782         request->devno = id.devno;
4783
4784         QETH_DBF_HEX(CTRL, 2, request, sizeof(*request));
4785         rc = diag26c(request, response, DIAG26C_MAC_SERVICES);
4786         QETH_DBF_HEX(CTRL, 2, request, sizeof(*request));
4787         if (rc)
4788                 goto out;
4789         QETH_DBF_HEX(CTRL, 2, response, sizeof(*response));
4790
4791         if (request->resp_buf_len < sizeof(*response) ||
4792             response->version != request->resp_version) {
4793                 rc = -EIO;
4794                 QETH_DBF_TEXT(SETUP, 2, "badresp");
4795                 QETH_DBF_HEX(SETUP, 2, &request->resp_buf_len,
4796                              sizeof(request->resp_buf_len));
4797         } else if (!is_valid_ether_addr(response->mac)) {
4798                 rc = -EINVAL;
4799                 QETH_DBF_TEXT(SETUP, 2, "badmac");
4800                 QETH_DBF_HEX(SETUP, 2, response->mac, ETH_ALEN);
4801         } else {
4802                 ether_addr_copy(card->dev->dev_addr, response->mac);
4803         }
4804
4805 out:
4806         kfree(response);
4807         kfree(request);
4808         return rc;
4809 }
4810 EXPORT_SYMBOL_GPL(qeth_vm_request_mac);
4811
4812 static int qeth_get_qdio_q_format(struct qeth_card *card)
4813 {
4814         if (card->info.type == QETH_CARD_TYPE_IQD)
4815                 return QDIO_IQDIO_QFMT;
4816         else
4817                 return QDIO_QETH_QFMT;
4818 }
4819
4820 static void qeth_determine_capabilities(struct qeth_card *card)
4821 {
4822         int rc;
4823         int length;
4824         char *prcd;
4825         struct ccw_device *ddev;
4826         int ddev_offline = 0;
4827
4828         QETH_DBF_TEXT(SETUP, 2, "detcapab");
4829         ddev = CARD_DDEV(card);
4830         if (!ddev->online) {
4831                 ddev_offline = 1;
4832                 rc = ccw_device_set_online(ddev);
4833                 if (rc) {
4834                         QETH_DBF_TEXT_(SETUP, 2, "3err%d", rc);
4835                         goto out;
4836                 }
4837         }
4838
4839         rc = qeth_read_conf_data(card, (void **) &prcd, &length);
4840         if (rc) {
4841                 QETH_DBF_MESSAGE(2, "qeth_read_conf_data on device %x returned %i\n",
4842                                  CARD_DEVID(card), rc);
4843                 QETH_DBF_TEXT_(SETUP, 2, "5err%d", rc);
4844                 goto out_offline;
4845         }
4846         qeth_configure_unitaddr(card, prcd);
4847         if (ddev_offline)
4848                 qeth_configure_blkt_default(card, prcd);
4849         kfree(prcd);
4850
4851         rc = qdio_get_ssqd_desc(ddev, &card->ssqd);
4852         if (rc)
4853                 QETH_DBF_TEXT_(SETUP, 2, "6err%d", rc);
4854
4855         QETH_DBF_TEXT_(SETUP, 2, "qfmt%d", card->ssqd.qfmt);
4856         QETH_DBF_TEXT_(SETUP, 2, "ac1:%02x", card->ssqd.qdioac1);
4857         QETH_DBF_TEXT_(SETUP, 2, "ac2:%04x", card->ssqd.qdioac2);
4858         QETH_DBF_TEXT_(SETUP, 2, "ac3:%04x", card->ssqd.qdioac3);
4859         QETH_DBF_TEXT_(SETUP, 2, "icnt%d", card->ssqd.icnt);
4860         if (!((card->ssqd.qfmt != QDIO_IQDIO_QFMT) ||
4861             ((card->ssqd.qdioac1 & CHSC_AC1_INITIATE_INPUTQ) == 0) ||
4862             ((card->ssqd.qdioac3 & CHSC_AC3_FORMAT2_CQ_AVAILABLE) == 0))) {
4863                 dev_info(&card->gdev->dev,
4864                         "Completion Queueing supported\n");
4865         } else {
4866                 card->options.cq = QETH_CQ_NOTAVAILABLE;
4867         }
4868
4869
4870 out_offline:
4871         if (ddev_offline == 1)
4872                 ccw_device_set_offline(ddev);
4873 out:
4874         return;
4875 }
4876
4877 static void qeth_qdio_establish_cq(struct qeth_card *card,
4878                                    struct qdio_buffer **in_sbal_ptrs,
4879                                    void (**queue_start_poll)
4880                                         (struct ccw_device *, int,
4881                                          unsigned long))
4882 {
4883         int i;
4884
4885         if (card->options.cq == QETH_CQ_ENABLED) {
4886                 int offset = QDIO_MAX_BUFFERS_PER_Q *
4887                              (card->qdio.no_in_queues - 1);
4888                 for (i = 0; i < QDIO_MAX_BUFFERS_PER_Q; ++i) {
4889                         in_sbal_ptrs[offset + i] = (struct qdio_buffer *)
4890                                 virt_to_phys(card->qdio.c_q->bufs[i].buffer);
4891                 }
4892
4893                 queue_start_poll[card->qdio.no_in_queues - 1] = NULL;
4894         }
4895 }
4896
4897 static int qeth_qdio_establish(struct qeth_card *card)
4898 {
4899         struct qdio_initialize init_data;
4900         char *qib_param_field;
4901         struct qdio_buffer **in_sbal_ptrs;
4902         void (**queue_start_poll) (struct ccw_device *, int, unsigned long);
4903         struct qdio_buffer **out_sbal_ptrs;
4904         int i, j, k;
4905         int rc = 0;
4906
4907         QETH_DBF_TEXT(SETUP, 2, "qdioest");
4908
4909         qib_param_field = kzalloc(QDIO_MAX_BUFFERS_PER_Q,
4910                                   GFP_KERNEL);
4911         if (!qib_param_field) {
4912                 rc =  -ENOMEM;
4913                 goto out_free_nothing;
4914         }
4915
4916         qeth_create_qib_param_field(card, qib_param_field);
4917         qeth_create_qib_param_field_blkt(card, qib_param_field);
4918
4919         in_sbal_ptrs = kcalloc(card->qdio.no_in_queues * QDIO_MAX_BUFFERS_PER_Q,
4920                                sizeof(void *),
4921                                GFP_KERNEL);
4922         if (!in_sbal_ptrs) {
4923                 rc = -ENOMEM;
4924                 goto out_free_qib_param;
4925         }
4926         for (i = 0; i < QDIO_MAX_BUFFERS_PER_Q; ++i) {
4927                 in_sbal_ptrs[i] = (struct qdio_buffer *)
4928                         virt_to_phys(card->qdio.in_q->bufs[i].buffer);
4929         }
4930
4931         queue_start_poll = kcalloc(card->qdio.no_in_queues, sizeof(void *),
4932                                    GFP_KERNEL);
4933         if (!queue_start_poll) {
4934                 rc = -ENOMEM;
4935                 goto out_free_in_sbals;
4936         }
4937         for (i = 0; i < card->qdio.no_in_queues; ++i)
4938                 queue_start_poll[i] = qeth_qdio_start_poll;
4939
4940         qeth_qdio_establish_cq(card, in_sbal_ptrs, queue_start_poll);
4941
4942         out_sbal_ptrs =
4943                 kcalloc(card->qdio.no_out_queues * QDIO_MAX_BUFFERS_PER_Q,
4944                         sizeof(void *),
4945                         GFP_KERNEL);
4946         if (!out_sbal_ptrs) {
4947                 rc = -ENOMEM;
4948                 goto out_free_queue_start_poll;
4949         }
4950         for (i = 0, k = 0; i < card->qdio.no_out_queues; ++i)
4951                 for (j = 0; j < QDIO_MAX_BUFFERS_PER_Q; ++j, ++k) {
4952                         out_sbal_ptrs[k] = (struct qdio_buffer *)virt_to_phys(
4953                                 card->qdio.out_qs[i]->bufs[j]->buffer);
4954                 }
4955
4956         memset(&init_data, 0, sizeof(struct qdio_initialize));
4957         init_data.cdev                   = CARD_DDEV(card);
4958         init_data.q_format               = qeth_get_qdio_q_format(card);
4959         init_data.qib_param_field_format = 0;
4960         init_data.qib_param_field        = qib_param_field;
4961         init_data.no_input_qs            = card->qdio.no_in_queues;
4962         init_data.no_output_qs           = card->qdio.no_out_queues;
4963         init_data.input_handler          = qeth_qdio_input_handler;
4964         init_data.output_handler         = qeth_qdio_output_handler;
4965         init_data.queue_start_poll_array = queue_start_poll;
4966         init_data.int_parm               = (unsigned long) card;
4967         init_data.input_sbal_addr_array  = (void **) in_sbal_ptrs;
4968         init_data.output_sbal_addr_array = (void **) out_sbal_ptrs;
4969         init_data.output_sbal_state_array = card->qdio.out_bufstates;
4970         init_data.scan_threshold =
4971                 (card->info.type == QETH_CARD_TYPE_IQD) ? 1 : 32;
4972
4973         if (atomic_cmpxchg(&card->qdio.state, QETH_QDIO_ALLOCATED,
4974                 QETH_QDIO_ESTABLISHED) == QETH_QDIO_ALLOCATED) {
4975                 rc = qdio_allocate(&init_data);
4976                 if (rc) {
4977                         atomic_set(&card->qdio.state, QETH_QDIO_ALLOCATED);
4978                         goto out;
4979                 }
4980                 rc = qdio_establish(&init_data);
4981                 if (rc) {
4982                         atomic_set(&card->qdio.state, QETH_QDIO_ALLOCATED);
4983                         qdio_free(CARD_DDEV(card));
4984                 }
4985         }
4986
4987         switch (card->options.cq) {
4988         case QETH_CQ_ENABLED:
4989                 dev_info(&card->gdev->dev, "Completion Queue support enabled");
4990                 break;
4991         case QETH_CQ_DISABLED:
4992                 dev_info(&card->gdev->dev, "Completion Queue support disabled");
4993                 break;
4994         default:
4995                 break;
4996         }
4997 out:
4998         kfree(out_sbal_ptrs);
4999 out_free_queue_start_poll:
5000         kfree(queue_start_poll);
5001 out_free_in_sbals:
5002         kfree(in_sbal_ptrs);
5003 out_free_qib_param:
5004         kfree(qib_param_field);
5005 out_free_nothing:
5006         return rc;
5007 }
5008
5009 static void qeth_core_free_card(struct qeth_card *card)
5010 {
5011         QETH_DBF_TEXT(SETUP, 2, "freecrd");
5012         QETH_DBF_HEX(SETUP, 2, &card, sizeof(void *));
5013         qeth_clean_channel(&card->read);
5014         qeth_clean_channel(&card->write);
5015         qeth_clean_channel(&card->data);
5016         destroy_workqueue(card->event_wq);
5017         qeth_free_qdio_buffers(card);
5018         unregister_service_level(&card->qeth_service_level);
5019         dev_set_drvdata(&card->gdev->dev, NULL);
5020         kfree(card);
5021 }
5022
5023 void qeth_trace_features(struct qeth_card *card)
5024 {
5025         QETH_CARD_TEXT(card, 2, "features");
5026         QETH_CARD_HEX(card, 2, &card->options.ipa4, sizeof(card->options.ipa4));
5027         QETH_CARD_HEX(card, 2, &card->options.ipa6, sizeof(card->options.ipa6));
5028         QETH_CARD_HEX(card, 2, &card->options.adp, sizeof(card->options.adp));
5029         QETH_CARD_HEX(card, 2, &card->info.diagass_support,
5030                       sizeof(card->info.diagass_support));
5031 }
5032 EXPORT_SYMBOL_GPL(qeth_trace_features);
5033
5034 static struct ccw_device_id qeth_ids[] = {
5035         {CCW_DEVICE_DEVTYPE(0x1731, 0x01, 0x1732, 0x01),
5036                                         .driver_info = QETH_CARD_TYPE_OSD},
5037         {CCW_DEVICE_DEVTYPE(0x1731, 0x05, 0x1732, 0x05),
5038                                         .driver_info = QETH_CARD_TYPE_IQD},
5039         {CCW_DEVICE_DEVTYPE(0x1731, 0x06, 0x1732, 0x06),
5040                                         .driver_info = QETH_CARD_TYPE_OSN},
5041         {CCW_DEVICE_DEVTYPE(0x1731, 0x02, 0x1732, 0x03),
5042                                         .driver_info = QETH_CARD_TYPE_OSM},
5043         {CCW_DEVICE_DEVTYPE(0x1731, 0x02, 0x1732, 0x02),
5044                                         .driver_info = QETH_CARD_TYPE_OSX},
5045         {},
5046 };
5047 MODULE_DEVICE_TABLE(ccw, qeth_ids);
5048
5049 static struct ccw_driver qeth_ccw_driver = {
5050         .driver = {
5051                 .owner = THIS_MODULE,
5052                 .name = "qeth",
5053         },
5054         .ids = qeth_ids,
5055         .probe = ccwgroup_probe_ccwdev,
5056         .remove = ccwgroup_remove_ccwdev,
5057 };
5058
5059 int qeth_core_hardsetup_card(struct qeth_card *card, bool *carrier_ok)
5060 {
5061         int retries = 3;
5062         int rc;
5063
5064         QETH_DBF_TEXT(SETUP, 2, "hrdsetup");
5065         atomic_set(&card->force_alloc_skb, 0);
5066         qeth_update_from_chp_desc(card);
5067 retry:
5068         if (retries < 3)
5069                 QETH_DBF_MESSAGE(2, "Retrying to do IDX activates on device %x.\n",
5070                                  CARD_DEVID(card));
5071         rc = qeth_qdio_clear_card(card, card->info.type != QETH_CARD_TYPE_IQD);
5072         ccw_device_set_offline(CARD_DDEV(card));
5073         ccw_device_set_offline(CARD_WDEV(card));
5074         ccw_device_set_offline(CARD_RDEV(card));
5075         qdio_free(CARD_DDEV(card));
5076         rc = ccw_device_set_online(CARD_RDEV(card));
5077         if (rc)
5078                 goto retriable;
5079         rc = ccw_device_set_online(CARD_WDEV(card));
5080         if (rc)
5081                 goto retriable;
5082         rc = ccw_device_set_online(CARD_DDEV(card));
5083         if (rc)
5084                 goto retriable;
5085 retriable:
5086         if (rc == -ERESTARTSYS) {
5087                 QETH_DBF_TEXT(SETUP, 2, "break1");
5088                 return rc;
5089         } else if (rc) {
5090                 QETH_DBF_TEXT_(SETUP, 2, "1err%d", rc);
5091                 if (--retries < 0)
5092                         goto out;
5093                 else
5094                         goto retry;
5095         }
5096         qeth_determine_capabilities(card);
5097         qeth_init_tokens(card);
5098         qeth_init_func_level(card);
5099         rc = qeth_idx_activate_channel(card, &card->read, qeth_idx_read_cb);
5100         if (rc == -ERESTARTSYS) {
5101                 QETH_DBF_TEXT(SETUP, 2, "break2");
5102                 return rc;
5103         } else if (rc) {
5104                 QETH_DBF_TEXT_(SETUP, 2, "3err%d", rc);
5105                 if (--retries < 0)
5106                         goto out;
5107                 else
5108                         goto retry;
5109         }
5110         rc = qeth_idx_activate_channel(card, &card->write, qeth_idx_write_cb);
5111         if (rc == -ERESTARTSYS) {
5112                 QETH_DBF_TEXT(SETUP, 2, "break3");
5113                 return rc;
5114         } else if (rc) {
5115                 QETH_DBF_TEXT_(SETUP, 2, "4err%d", rc);
5116                 if (--retries < 0)
5117                         goto out;
5118                 else
5119                         goto retry;
5120         }
5121         card->read_or_write_problem = 0;
5122         rc = qeth_mpc_initialize(card);
5123         if (rc) {
5124                 QETH_DBF_TEXT_(SETUP, 2, "5err%d", rc);
5125                 goto out;
5126         }
5127
5128         rc = qeth_send_startlan(card);
5129         if (rc) {
5130                 QETH_DBF_TEXT_(SETUP, 2, "6err%d", rc);
5131                 if (rc == IPA_RC_LAN_OFFLINE) {
5132                         dev_warn(&card->gdev->dev,
5133                                 "The LAN is offline\n");
5134                         *carrier_ok = false;
5135                 } else {
5136                         rc = -ENODEV;
5137                         goto out;
5138                 }
5139         } else {
5140                 *carrier_ok = true;
5141         }
5142
5143         card->options.ipa4.supported_funcs = 0;
5144         card->options.ipa6.supported_funcs = 0;
5145         card->options.adp.supported_funcs = 0;
5146         card->options.sbp.supported_funcs = 0;
5147         card->info.diagass_support = 0;
5148         rc = qeth_query_ipassists(card, QETH_PROT_IPV4);
5149         if (rc == -ENOMEM)
5150                 goto out;
5151         if (qeth_is_supported(card, IPA_IPV6)) {
5152                 rc = qeth_query_ipassists(card, QETH_PROT_IPV6);
5153                 if (rc == -ENOMEM)
5154                         goto out;
5155         }
5156         if (qeth_is_supported(card, IPA_SETADAPTERPARMS)) {
5157                 rc = qeth_query_setadapterparms(card);
5158                 if (rc < 0) {
5159                         QETH_DBF_TEXT_(SETUP, 2, "7err%d", rc);
5160                         goto out;
5161                 }
5162         }
5163         if (qeth_adp_supported(card, IPA_SETADP_SET_DIAG_ASSIST)) {
5164                 rc = qeth_query_setdiagass(card);
5165                 if (rc < 0) {
5166                         QETH_DBF_TEXT_(SETUP, 2, "8err%d", rc);
5167                         goto out;
5168                 }
5169         }
5170         return 0;
5171 out:
5172         dev_warn(&card->gdev->dev, "The qeth device driver failed to recover "
5173                 "an error on the device\n");
5174         QETH_DBF_MESSAGE(2, "Initialization for device %x failed in hardsetup! rc=%d\n",
5175                          CARD_DEVID(card), rc);
5176         return rc;
5177 }
5178 EXPORT_SYMBOL_GPL(qeth_core_hardsetup_card);
5179
5180 static void qeth_create_skb_frag(struct qdio_buffer_element *element,
5181                                  struct sk_buff *skb, int offset, int data_len)
5182 {
5183         struct page *page = virt_to_page(element->addr);
5184         unsigned int next_frag;
5185
5186         /* first fill the linear space */
5187         if (!skb->len) {
5188                 unsigned int linear = min(data_len, skb_tailroom(skb));
5189
5190                 skb_put_data(skb, element->addr + offset, linear);
5191                 data_len -= linear;
5192                 if (!data_len)
5193                         return;
5194                 offset += linear;
5195                 /* fall through to add page frag for remaining data */
5196         }
5197
5198         next_frag = skb_shinfo(skb)->nr_frags;
5199         get_page(page);
5200         skb_add_rx_frag(skb, next_frag, page, offset, data_len, data_len);
5201 }
5202
5203 static inline int qeth_is_last_sbale(struct qdio_buffer_element *sbale)
5204 {
5205         return (sbale->eflags & SBAL_EFLAGS_LAST_ENTRY);
5206 }
5207
5208 struct sk_buff *qeth_core_get_next_skb(struct qeth_card *card,
5209                 struct qeth_qdio_buffer *qethbuffer,
5210                 struct qdio_buffer_element **__element, int *__offset,
5211                 struct qeth_hdr **hdr)
5212 {
5213         struct qdio_buffer_element *element = *__element;
5214         struct qdio_buffer *buffer = qethbuffer->buffer;
5215         int offset = *__offset;
5216         struct sk_buff *skb;
5217         int skb_len = 0;
5218         void *data_ptr;
5219         int data_len;
5220         int headroom = 0;
5221         int use_rx_sg = 0;
5222
5223         /* qeth_hdr must not cross element boundaries */
5224         while (element->length < offset + sizeof(struct qeth_hdr)) {
5225                 if (qeth_is_last_sbale(element))
5226                         return NULL;
5227                 element++;
5228                 offset = 0;
5229         }
5230         *hdr = element->addr + offset;
5231
5232         offset += sizeof(struct qeth_hdr);
5233         switch ((*hdr)->hdr.l2.id) {
5234         case QETH_HEADER_TYPE_LAYER2:
5235                 skb_len = (*hdr)->hdr.l2.pkt_length;
5236                 break;
5237         case QETH_HEADER_TYPE_LAYER3:
5238                 skb_len = (*hdr)->hdr.l3.length;
5239                 headroom = ETH_HLEN;
5240                 break;
5241         case QETH_HEADER_TYPE_OSN:
5242                 skb_len = (*hdr)->hdr.osn.pdu_length;
5243                 headroom = sizeof(struct qeth_hdr);
5244                 break;
5245         default:
5246                 break;
5247         }
5248
5249         if (!skb_len)
5250                 return NULL;
5251
5252         if (((skb_len >= card->options.rx_sg_cb) &&
5253              (!(card->info.type == QETH_CARD_TYPE_OSN)) &&
5254              (!atomic_read(&card->force_alloc_skb))) ||
5255             (card->options.cq == QETH_CQ_ENABLED))
5256                 use_rx_sg = 1;
5257
5258         if (use_rx_sg && qethbuffer->rx_skb) {
5259                 /* QETH_CQ_ENABLED only: */
5260                 skb = qethbuffer->rx_skb;
5261                 qethbuffer->rx_skb = NULL;
5262         } else {
5263                 unsigned int linear = (use_rx_sg) ? QETH_RX_PULL_LEN : skb_len;
5264
5265                 skb = napi_alloc_skb(&card->napi, linear + headroom);
5266         }
5267         if (!skb)
5268                 goto no_mem;
5269         if (headroom)
5270                 skb_reserve(skb, headroom);
5271
5272         data_ptr = element->addr + offset;
5273         while (skb_len) {
5274                 data_len = min(skb_len, (int)(element->length - offset));
5275                 if (data_len) {
5276                         if (use_rx_sg)
5277                                 qeth_create_skb_frag(element, skb, offset,
5278                                                      data_len);
5279                         else
5280                                 skb_put_data(skb, data_ptr, data_len);
5281                 }
5282                 skb_len -= data_len;
5283                 if (skb_len) {
5284                         if (qeth_is_last_sbale(element)) {
5285                                 QETH_CARD_TEXT(card, 4, "unexeob");
5286                                 QETH_CARD_HEX(card, 2, buffer, sizeof(void *));
5287                                 dev_kfree_skb_any(skb);
5288                                 card->stats.rx_errors++;
5289                                 return NULL;
5290                         }
5291                         element++;
5292                         offset = 0;
5293                         data_ptr = element->addr;
5294                 } else {
5295                         offset += data_len;
5296                 }
5297         }
5298         *__element = element;
5299         *__offset = offset;
5300         if (use_rx_sg && card->options.performance_stats) {
5301                 card->perf_stats.sg_skbs_rx++;
5302                 card->perf_stats.sg_frags_rx += skb_shinfo(skb)->nr_frags;
5303         }
5304         return skb;
5305 no_mem:
5306         if (net_ratelimit()) {
5307                 QETH_CARD_TEXT(card, 2, "noskbmem");
5308         }
5309         card->stats.rx_dropped++;
5310         return NULL;
5311 }
5312 EXPORT_SYMBOL_GPL(qeth_core_get_next_skb);
5313
5314 int qeth_poll(struct napi_struct *napi, int budget)
5315 {
5316         struct qeth_card *card = container_of(napi, struct qeth_card, napi);
5317         int work_done = 0;
5318         struct qeth_qdio_buffer *buffer;
5319         int done;
5320         int new_budget = budget;
5321
5322         if (card->options.performance_stats) {
5323                 card->perf_stats.inbound_cnt++;
5324                 card->perf_stats.inbound_start_time = qeth_get_micros();
5325         }
5326
5327         while (1) {
5328                 if (!card->rx.b_count) {
5329                         card->rx.qdio_err = 0;
5330                         card->rx.b_count = qdio_get_next_buffers(
5331                                 card->data.ccwdev, 0, &card->rx.b_index,
5332                                 &card->rx.qdio_err);
5333                         if (card->rx.b_count <= 0) {
5334                                 card->rx.b_count = 0;
5335                                 break;
5336                         }
5337                         card->rx.b_element =
5338                                 &card->qdio.in_q->bufs[card->rx.b_index]
5339                                 .buffer->element[0];
5340                         card->rx.e_offset = 0;
5341                 }
5342
5343                 while (card->rx.b_count) {
5344                         buffer = &card->qdio.in_q->bufs[card->rx.b_index];
5345                         if (!(card->rx.qdio_err &&
5346                             qeth_check_qdio_errors(card, buffer->buffer,
5347                             card->rx.qdio_err, "qinerr")))
5348                                 work_done +=
5349                                         card->discipline->process_rx_buffer(
5350                                                 card, new_budget, &done);
5351                         else
5352                                 done = 1;
5353
5354                         if (done) {
5355                                 if (card->options.performance_stats)
5356                                         card->perf_stats.bufs_rec++;
5357                                 qeth_put_buffer_pool_entry(card,
5358                                         buffer->pool_entry);
5359                                 qeth_queue_input_buffer(card, card->rx.b_index);
5360                                 card->rx.b_count--;
5361                                 if (card->rx.b_count) {
5362                                         card->rx.b_index =
5363                                                 (card->rx.b_index + 1) %
5364                                                 QDIO_MAX_BUFFERS_PER_Q;
5365                                         card->rx.b_element =
5366                                                 &card->qdio.in_q
5367                                                 ->bufs[card->rx.b_index]
5368                                                 .buffer->element[0];
5369                                         card->rx.e_offset = 0;
5370                                 }
5371                         }
5372
5373                         if (work_done >= budget)
5374                                 goto out;
5375                         else
5376                                 new_budget = budget - work_done;
5377                 }
5378         }
5379
5380         napi_complete_done(napi, work_done);
5381         if (qdio_start_irq(card->data.ccwdev, 0))
5382                 napi_schedule(&card->napi);
5383 out:
5384         if (card->options.performance_stats)
5385                 card->perf_stats.inbound_time += qeth_get_micros() -
5386                         card->perf_stats.inbound_start_time;
5387         return work_done;
5388 }
5389 EXPORT_SYMBOL_GPL(qeth_poll);
5390
5391 static int qeth_setassparms_inspect_rc(struct qeth_ipa_cmd *cmd)
5392 {
5393         if (!cmd->hdr.return_code)
5394                 cmd->hdr.return_code = cmd->data.setassparms.hdr.return_code;
5395         return cmd->hdr.return_code;
5396 }
5397
5398 static int qeth_setassparms_get_caps_cb(struct qeth_card *card,
5399                                         struct qeth_reply *reply,
5400                                         unsigned long data)
5401 {
5402         struct qeth_ipa_cmd *cmd = (struct qeth_ipa_cmd *) data;
5403         struct qeth_ipa_caps *caps = reply->param;
5404
5405         if (qeth_setassparms_inspect_rc(cmd))
5406                 return 0;
5407
5408         caps->supported = cmd->data.setassparms.data.caps.supported;
5409         caps->enabled = cmd->data.setassparms.data.caps.enabled;
5410         return 0;
5411 }
5412
5413 int qeth_setassparms_cb(struct qeth_card *card,
5414                         struct qeth_reply *reply, unsigned long data)
5415 {
5416         struct qeth_ipa_cmd *cmd;
5417
5418         QETH_CARD_TEXT(card, 4, "defadpcb");
5419
5420         cmd = (struct qeth_ipa_cmd *) data;
5421         if (cmd->hdr.return_code == 0) {
5422                 cmd->hdr.return_code = cmd->data.setassparms.hdr.return_code;
5423                 if (cmd->hdr.prot_version == QETH_PROT_IPV4)
5424                         card->options.ipa4.enabled_funcs = cmd->hdr.ipa_enabled;
5425                 if (cmd->hdr.prot_version == QETH_PROT_IPV6)
5426                         card->options.ipa6.enabled_funcs = cmd->hdr.ipa_enabled;
5427         }
5428         return 0;
5429 }
5430 EXPORT_SYMBOL_GPL(qeth_setassparms_cb);
5431
5432 struct qeth_cmd_buffer *qeth_get_setassparms_cmd(struct qeth_card *card,
5433                                                  enum qeth_ipa_funcs ipa_func,
5434                                                  __u16 cmd_code, __u16 len,
5435                                                  enum qeth_prot_versions prot)
5436 {
5437         struct qeth_cmd_buffer *iob;
5438         struct qeth_ipa_cmd *cmd;
5439
5440         QETH_CARD_TEXT(card, 4, "getasscm");
5441         iob = qeth_get_ipacmd_buffer(card, IPA_CMD_SETASSPARMS, prot);
5442
5443         if (iob) {
5444                 cmd = __ipa_cmd(iob);
5445                 cmd->data.setassparms.hdr.assist_no = ipa_func;
5446                 cmd->data.setassparms.hdr.length = 8 + len;
5447                 cmd->data.setassparms.hdr.command_code = cmd_code;
5448         }
5449
5450         return iob;
5451 }
5452 EXPORT_SYMBOL_GPL(qeth_get_setassparms_cmd);
5453
5454 int qeth_send_simple_setassparms_prot(struct qeth_card *card,
5455                                       enum qeth_ipa_funcs ipa_func,
5456                                       u16 cmd_code, long data,
5457                                       enum qeth_prot_versions prot)
5458 {
5459         int length = 0;
5460         struct qeth_cmd_buffer *iob;
5461
5462         QETH_CARD_TEXT_(card, 4, "simassp%i", prot);
5463         if (data)
5464                 length = sizeof(__u32);
5465         iob = qeth_get_setassparms_cmd(card, ipa_func, cmd_code, length, prot);
5466         if (!iob)
5467                 return -ENOMEM;
5468
5469         __ipa_cmd(iob)->data.setassparms.data.flags_32bit = (__u32) data;
5470         return qeth_send_ipa_cmd(card, iob, qeth_setassparms_cb, NULL);
5471 }
5472 EXPORT_SYMBOL_GPL(qeth_send_simple_setassparms_prot);
5473
5474 static void qeth_unregister_dbf_views(void)
5475 {
5476         int x;
5477         for (x = 0; x < QETH_DBF_INFOS; x++) {
5478                 debug_unregister(qeth_dbf[x].id);
5479                 qeth_dbf[x].id = NULL;
5480         }
5481 }
5482
5483 void qeth_dbf_longtext(debug_info_t *id, int level, char *fmt, ...)
5484 {
5485         char dbf_txt_buf[32];
5486         va_list args;
5487
5488         if (!debug_level_enabled(id, level))
5489                 return;
5490         va_start(args, fmt);
5491         vsnprintf(dbf_txt_buf, sizeof(dbf_txt_buf), fmt, args);
5492         va_end(args);
5493         debug_text_event(id, level, dbf_txt_buf);
5494 }
5495 EXPORT_SYMBOL_GPL(qeth_dbf_longtext);
5496
5497 static int qeth_register_dbf_views(void)
5498 {
5499         int ret;
5500         int x;
5501
5502         for (x = 0; x < QETH_DBF_INFOS; x++) {
5503                 /* register the areas */
5504                 qeth_dbf[x].id = debug_register(qeth_dbf[x].name,
5505                                                 qeth_dbf[x].pages,
5506                                                 qeth_dbf[x].areas,
5507                                                 qeth_dbf[x].len);
5508                 if (qeth_dbf[x].id == NULL) {
5509                         qeth_unregister_dbf_views();
5510                         return -ENOMEM;
5511                 }
5512
5513                 /* register a view */
5514                 ret = debug_register_view(qeth_dbf[x].id, qeth_dbf[x].view);
5515                 if (ret) {
5516                         qeth_unregister_dbf_views();
5517                         return ret;
5518                 }
5519
5520                 /* set a passing level */
5521                 debug_set_level(qeth_dbf[x].id, qeth_dbf[x].level);
5522         }
5523
5524         return 0;
5525 }
5526
5527 static DEFINE_MUTEX(qeth_mod_mutex);    /* for synchronized module loading */
5528
5529 int qeth_core_load_discipline(struct qeth_card *card,
5530                 enum qeth_discipline_id discipline)
5531 {
5532         mutex_lock(&qeth_mod_mutex);
5533         switch (discipline) {
5534         case QETH_DISCIPLINE_LAYER3:
5535                 card->discipline = try_then_request_module(
5536                         symbol_get(qeth_l3_discipline), "qeth_l3");
5537                 break;
5538         case QETH_DISCIPLINE_LAYER2:
5539                 card->discipline = try_then_request_module(
5540                         symbol_get(qeth_l2_discipline), "qeth_l2");
5541                 break;
5542         default:
5543                 break;
5544         }
5545         mutex_unlock(&qeth_mod_mutex);
5546
5547         if (!card->discipline) {
5548                 dev_err(&card->gdev->dev, "There is no kernel module to "
5549                         "support discipline %d\n", discipline);
5550                 return -EINVAL;
5551         }
5552
5553         card->options.layer = discipline;
5554         return 0;
5555 }
5556
5557 void qeth_core_free_discipline(struct qeth_card *card)
5558 {
5559         if (IS_LAYER2(card))
5560                 symbol_put(qeth_l2_discipline);
5561         else
5562                 symbol_put(qeth_l3_discipline);
5563         card->options.layer = QETH_DISCIPLINE_UNDETERMINED;
5564         card->discipline = NULL;
5565 }
5566
5567 const struct device_type qeth_generic_devtype = {
5568         .name = "qeth_generic",
5569         .groups = qeth_generic_attr_groups,
5570 };
5571 EXPORT_SYMBOL_GPL(qeth_generic_devtype);
5572
5573 static const struct device_type qeth_osn_devtype = {
5574         .name = "qeth_osn",
5575         .groups = qeth_osn_attr_groups,
5576 };
5577
5578 #define DBF_NAME_LEN    20
5579
5580 struct qeth_dbf_entry {
5581         char dbf_name[DBF_NAME_LEN];
5582         debug_info_t *dbf_info;
5583         struct list_head dbf_list;
5584 };
5585
5586 static LIST_HEAD(qeth_dbf_list);
5587 static DEFINE_MUTEX(qeth_dbf_list_mutex);
5588
5589 static debug_info_t *qeth_get_dbf_entry(char *name)
5590 {
5591         struct qeth_dbf_entry *entry;
5592         debug_info_t *rc = NULL;
5593
5594         mutex_lock(&qeth_dbf_list_mutex);
5595         list_for_each_entry(entry, &qeth_dbf_list, dbf_list) {
5596                 if (strcmp(entry->dbf_name, name) == 0) {
5597                         rc = entry->dbf_info;
5598                         break;
5599                 }
5600         }
5601         mutex_unlock(&qeth_dbf_list_mutex);
5602         return rc;
5603 }
5604
5605 static int qeth_add_dbf_entry(struct qeth_card *card, char *name)
5606 {
5607         struct qeth_dbf_entry *new_entry;
5608
5609         card->debug = debug_register(name, 2, 1, 8);
5610         if (!card->debug) {
5611                 QETH_DBF_TEXT_(SETUP, 2, "%s", "qcdbf");
5612                 goto err;
5613         }
5614         if (debug_register_view(card->debug, &debug_hex_ascii_view))
5615                 goto err_dbg;
5616         new_entry = kzalloc(sizeof(struct qeth_dbf_entry), GFP_KERNEL);
5617         if (!new_entry)
5618                 goto err_dbg;
5619         strncpy(new_entry->dbf_name, name, DBF_NAME_LEN);
5620         new_entry->dbf_info = card->debug;
5621         mutex_lock(&qeth_dbf_list_mutex);
5622         list_add(&new_entry->dbf_list, &qeth_dbf_list);
5623         mutex_unlock(&qeth_dbf_list_mutex);
5624
5625         return 0;
5626
5627 err_dbg:
5628         debug_unregister(card->debug);
5629 err:
5630         return -ENOMEM;
5631 }
5632
5633 static void qeth_clear_dbf_list(void)
5634 {
5635         struct qeth_dbf_entry *entry, *tmp;
5636
5637         mutex_lock(&qeth_dbf_list_mutex);
5638         list_for_each_entry_safe(entry, tmp, &qeth_dbf_list, dbf_list) {
5639                 list_del(&entry->dbf_list);
5640                 debug_unregister(entry->dbf_info);
5641                 kfree(entry);
5642         }
5643         mutex_unlock(&qeth_dbf_list_mutex);
5644 }
5645
5646 static struct net_device *qeth_alloc_netdev(struct qeth_card *card)
5647 {
5648         struct net_device *dev;
5649
5650         switch (card->info.type) {
5651         case QETH_CARD_TYPE_IQD:
5652                 dev = alloc_netdev(0, "hsi%d", NET_NAME_UNKNOWN, ether_setup);
5653                 break;
5654         case QETH_CARD_TYPE_OSN:
5655                 dev = alloc_netdev(0, "osn%d", NET_NAME_UNKNOWN, ether_setup);
5656                 break;
5657         default:
5658                 dev = alloc_etherdev(0);
5659         }
5660
5661         if (!dev)
5662                 return NULL;
5663
5664         dev->ml_priv = card;
5665         dev->watchdog_timeo = QETH_TX_TIMEOUT;
5666         dev->min_mtu = IS_OSN(card) ? 64 : 576;
5667          /* initialized when device first goes online: */
5668         dev->max_mtu = 0;
5669         dev->mtu = 0;
5670         SET_NETDEV_DEV(dev, &card->gdev->dev);
5671         netif_carrier_off(dev);
5672
5673         if (!IS_OSN(card)) {
5674                 dev->priv_flags &= ~IFF_TX_SKB_SHARING;
5675                 dev->hw_features |= NETIF_F_SG;
5676                 dev->vlan_features |= NETIF_F_SG;
5677                 if (IS_IQD(card))
5678                         dev->features |= NETIF_F_SG;
5679         }
5680
5681         return dev;
5682 }
5683
5684 struct net_device *qeth_clone_netdev(struct net_device *orig)
5685 {
5686         struct net_device *clone = qeth_alloc_netdev(orig->ml_priv);
5687
5688         if (!clone)
5689                 return NULL;
5690
5691         clone->dev_port = orig->dev_port;
5692         return clone;
5693 }
5694
5695 static int qeth_core_probe_device(struct ccwgroup_device *gdev)
5696 {
5697         struct qeth_card *card;
5698         struct device *dev;
5699         int rc;
5700         enum qeth_discipline_id enforced_disc;
5701         char dbf_name[DBF_NAME_LEN];
5702
5703         QETH_DBF_TEXT(SETUP, 2, "probedev");
5704
5705         dev = &gdev->dev;
5706         if (!get_device(dev))
5707                 return -ENODEV;
5708
5709         QETH_DBF_TEXT_(SETUP, 2, "%s", dev_name(&gdev->dev));
5710
5711         card = qeth_alloc_card(gdev);
5712         if (!card) {
5713                 QETH_DBF_TEXT_(SETUP, 2, "1err%d", -ENOMEM);
5714                 rc = -ENOMEM;
5715                 goto err_dev;
5716         }
5717
5718         snprintf(dbf_name, sizeof(dbf_name), "qeth_card_%s",
5719                 dev_name(&gdev->dev));
5720         card->debug = qeth_get_dbf_entry(dbf_name);
5721         if (!card->debug) {
5722                 rc = qeth_add_dbf_entry(card, dbf_name);
5723                 if (rc)
5724                         goto err_card;
5725         }
5726
5727         qeth_setup_card(card);
5728         qeth_update_from_chp_desc(card);
5729
5730         card->dev = qeth_alloc_netdev(card);
5731         if (!card->dev) {
5732                 rc = -ENOMEM;
5733                 goto err_card;
5734         }
5735
5736         qeth_determine_capabilities(card);
5737         enforced_disc = qeth_enforce_discipline(card);
5738         switch (enforced_disc) {
5739         case QETH_DISCIPLINE_UNDETERMINED:
5740                 gdev->dev.type = &qeth_generic_devtype;
5741                 break;
5742         default:
5743                 card->info.layer_enforced = true;
5744                 rc = qeth_core_load_discipline(card, enforced_disc);
5745                 if (rc)
5746                         goto err_load;
5747
5748                 gdev->dev.type = (card->info.type != QETH_CARD_TYPE_OSN)
5749                                         ? card->discipline->devtype
5750                                         : &qeth_osn_devtype;
5751                 rc = card->discipline->setup(card->gdev);
5752                 if (rc)
5753                         goto err_disc;
5754                 break;
5755         }
5756
5757         return 0;
5758
5759 err_disc:
5760         qeth_core_free_discipline(card);
5761 err_load:
5762         free_netdev(card->dev);
5763 err_card:
5764         qeth_core_free_card(card);
5765 err_dev:
5766         put_device(dev);
5767         return rc;
5768 }
5769
5770 static void qeth_core_remove_device(struct ccwgroup_device *gdev)
5771 {
5772         struct qeth_card *card = dev_get_drvdata(&gdev->dev);
5773
5774         QETH_DBF_TEXT(SETUP, 2, "removedv");
5775
5776         if (card->discipline) {
5777                 card->discipline->remove(gdev);
5778                 qeth_core_free_discipline(card);
5779         }
5780
5781         free_netdev(card->dev);
5782         qeth_core_free_card(card);
5783         put_device(&gdev->dev);
5784 }
5785
5786 static int qeth_core_set_online(struct ccwgroup_device *gdev)
5787 {
5788         struct qeth_card *card = dev_get_drvdata(&gdev->dev);
5789         int rc = 0;
5790         enum qeth_discipline_id def_discipline;
5791
5792         if (!card->discipline) {
5793                 if (card->info.type == QETH_CARD_TYPE_IQD)
5794                         def_discipline = QETH_DISCIPLINE_LAYER3;
5795                 else
5796                         def_discipline = QETH_DISCIPLINE_LAYER2;
5797                 rc = qeth_core_load_discipline(card, def_discipline);
5798                 if (rc)
5799                         goto err;
5800                 rc = card->discipline->setup(card->gdev);
5801                 if (rc) {
5802                         qeth_core_free_discipline(card);
5803                         goto err;
5804                 }
5805         }
5806         rc = card->discipline->set_online(gdev);
5807 err:
5808         return rc;
5809 }
5810
5811 static int qeth_core_set_offline(struct ccwgroup_device *gdev)
5812 {
5813         struct qeth_card *card = dev_get_drvdata(&gdev->dev);
5814         return card->discipline->set_offline(gdev);
5815 }
5816
5817 static void qeth_core_shutdown(struct ccwgroup_device *gdev)
5818 {
5819         struct qeth_card *card = dev_get_drvdata(&gdev->dev);
5820         qeth_set_allowed_threads(card, 0, 1);
5821         if ((gdev->state == CCWGROUP_ONLINE) && card->info.hwtrap)
5822                 qeth_hw_trap(card, QETH_DIAGS_TRAP_DISARM);
5823         qeth_qdio_clear_card(card, 0);
5824         qeth_clear_qdio_buffers(card);
5825         qdio_free(CARD_DDEV(card));
5826 }
5827
5828 static int qeth_core_freeze(struct ccwgroup_device *gdev)
5829 {
5830         struct qeth_card *card = dev_get_drvdata(&gdev->dev);
5831         if (card->discipline && card->discipline->freeze)
5832                 return card->discipline->freeze(gdev);
5833         return 0;
5834 }
5835
5836 static int qeth_core_thaw(struct ccwgroup_device *gdev)
5837 {
5838         struct qeth_card *card = dev_get_drvdata(&gdev->dev);
5839         if (card->discipline && card->discipline->thaw)
5840                 return card->discipline->thaw(gdev);
5841         return 0;
5842 }
5843
5844 static int qeth_core_restore(struct ccwgroup_device *gdev)
5845 {
5846         struct qeth_card *card = dev_get_drvdata(&gdev->dev);
5847         if (card->discipline && card->discipline->restore)
5848                 return card->discipline->restore(gdev);
5849         return 0;
5850 }
5851
5852 static ssize_t group_store(struct device_driver *ddrv, const char *buf,
5853                            size_t count)
5854 {
5855         int err;
5856
5857         err = ccwgroup_create_dev(qeth_core_root_dev, to_ccwgroupdrv(ddrv), 3,
5858                                   buf);
5859
5860         return err ? err : count;
5861 }
5862 static DRIVER_ATTR_WO(group);
5863
5864 static struct attribute *qeth_drv_attrs[] = {
5865         &driver_attr_group.attr,
5866         NULL,
5867 };
5868 static struct attribute_group qeth_drv_attr_group = {
5869         .attrs = qeth_drv_attrs,
5870 };
5871 static const struct attribute_group *qeth_drv_attr_groups[] = {
5872         &qeth_drv_attr_group,
5873         NULL,
5874 };
5875
5876 static struct ccwgroup_driver qeth_core_ccwgroup_driver = {
5877         .driver = {
5878                 .groups = qeth_drv_attr_groups,
5879                 .owner = THIS_MODULE,
5880                 .name = "qeth",
5881         },
5882         .ccw_driver = &qeth_ccw_driver,
5883         .setup = qeth_core_probe_device,
5884         .remove = qeth_core_remove_device,
5885         .set_online = qeth_core_set_online,
5886         .set_offline = qeth_core_set_offline,
5887         .shutdown = qeth_core_shutdown,
5888         .prepare = NULL,
5889         .complete = NULL,
5890         .freeze = qeth_core_freeze,
5891         .thaw = qeth_core_thaw,
5892         .restore = qeth_core_restore,
5893 };
5894
5895 struct qeth_card *qeth_get_card_by_busid(char *bus_id)
5896 {
5897         struct ccwgroup_device *gdev;
5898         struct qeth_card *card;
5899
5900         gdev = get_ccwgroupdev_by_busid(&qeth_core_ccwgroup_driver, bus_id);
5901         if (!gdev)
5902                 return NULL;
5903
5904         card = dev_get_drvdata(&gdev->dev);
5905         put_device(&gdev->dev);
5906         return card;
5907 }
5908 EXPORT_SYMBOL_GPL(qeth_get_card_by_busid);
5909
5910 int qeth_do_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
5911 {
5912         struct qeth_card *card = dev->ml_priv;
5913         struct mii_ioctl_data *mii_data;
5914         int rc = 0;
5915
5916         if (!card)
5917                 return -ENODEV;
5918
5919         if (card->info.type == QETH_CARD_TYPE_OSN)
5920                 return -EPERM;
5921
5922         switch (cmd) {
5923         case SIOC_QETH_ADP_SET_SNMP_CONTROL:
5924                 rc = qeth_snmp_command(card, rq->ifr_ifru.ifru_data);
5925                 break;
5926         case SIOC_QETH_GET_CARD_TYPE:
5927                 if ((card->info.type == QETH_CARD_TYPE_OSD ||
5928                      card->info.type == QETH_CARD_TYPE_OSM ||
5929                      card->info.type == QETH_CARD_TYPE_OSX) &&
5930                     !card->info.guestlan)
5931                         return 1;
5932                 else
5933                         return 0;
5934         case SIOCGMIIPHY:
5935                 mii_data = if_mii(rq);
5936                 mii_data->phy_id = 0;
5937                 break;
5938         case SIOCGMIIREG:
5939                 mii_data = if_mii(rq);
5940                 if (mii_data->phy_id != 0)
5941                         rc = -EINVAL;
5942                 else
5943                         mii_data->val_out = qeth_mdio_read(dev,
5944                                 mii_data->phy_id, mii_data->reg_num);
5945                 break;
5946         case SIOC_QETH_QUERY_OAT:
5947                 rc = qeth_query_oat_command(card, rq->ifr_ifru.ifru_data);
5948                 break;
5949         default:
5950                 if (card->discipline->do_ioctl)
5951                         rc = card->discipline->do_ioctl(dev, rq, cmd);
5952                 else
5953                         rc = -EOPNOTSUPP;
5954         }
5955         if (rc)
5956                 QETH_CARD_TEXT_(card, 2, "ioce%x", rc);
5957         return rc;
5958 }
5959 EXPORT_SYMBOL_GPL(qeth_do_ioctl);
5960
5961 static struct {
5962         const char str[ETH_GSTRING_LEN];
5963 } qeth_ethtool_stats_keys[] = {
5964 /*  0 */{"rx skbs"},
5965         {"rx buffers"},
5966         {"tx skbs"},
5967         {"tx buffers"},
5968         {"tx skbs no packing"},
5969         {"tx buffers no packing"},
5970         {"tx skbs packing"},
5971         {"tx buffers packing"},
5972         {"tx sg skbs"},
5973         {"tx buffer elements"},
5974 /* 10 */{"rx sg skbs"},
5975         {"rx sg frags"},
5976         {"rx sg page allocs"},
5977         {"tx large kbytes"},
5978         {"tx large count"},
5979         {"tx pk state ch n->p"},
5980         {"tx pk state ch p->n"},
5981         {"tx pk watermark low"},
5982         {"tx pk watermark high"},
5983         {"queue 0 buffer usage"},
5984 /* 20 */{"queue 1 buffer usage"},
5985         {"queue 2 buffer usage"},
5986         {"queue 3 buffer usage"},
5987         {"rx poll time"},
5988         {"rx poll count"},
5989         {"rx do_QDIO time"},
5990         {"rx do_QDIO count"},
5991         {"tx handler time"},
5992         {"tx handler count"},
5993         {"tx time"},
5994 /* 30 */{"tx count"},
5995         {"tx do_QDIO time"},
5996         {"tx do_QDIO count"},
5997         {"tx csum"},
5998         {"tx lin"},
5999         {"tx linfail"},
6000         {"cq handler count"},
6001         {"cq handler time"},
6002         {"rx csum"}
6003 };
6004
6005 int qeth_core_get_sset_count(struct net_device *dev, int stringset)
6006 {
6007         switch (stringset) {
6008         case ETH_SS_STATS:
6009                 return (sizeof(qeth_ethtool_stats_keys) / ETH_GSTRING_LEN);
6010         default:
6011                 return -EINVAL;
6012         }
6013 }
6014 EXPORT_SYMBOL_GPL(qeth_core_get_sset_count);
6015
6016 void qeth_core_get_ethtool_stats(struct net_device *dev,
6017                 struct ethtool_stats *stats, u64 *data)
6018 {
6019         struct qeth_card *card = dev->ml_priv;
6020         data[0] = card->stats.rx_packets -
6021                                 card->perf_stats.initial_rx_packets;
6022         data[1] = card->perf_stats.bufs_rec;
6023         data[2] = card->stats.tx_packets -
6024                                 card->perf_stats.initial_tx_packets;
6025         data[3] = card->perf_stats.bufs_sent;
6026         data[4] = card->stats.tx_packets - card->perf_stats.initial_tx_packets
6027                         - card->perf_stats.skbs_sent_pack;
6028         data[5] = card->perf_stats.bufs_sent - card->perf_stats.bufs_sent_pack;
6029         data[6] = card->perf_stats.skbs_sent_pack;
6030         data[7] = card->perf_stats.bufs_sent_pack;
6031         data[8] = card->perf_stats.sg_skbs_sent;
6032         data[9] = card->perf_stats.buf_elements_sent;
6033         data[10] = card->perf_stats.sg_skbs_rx;
6034         data[11] = card->perf_stats.sg_frags_rx;
6035         data[12] = card->perf_stats.sg_alloc_page_rx;
6036         data[13] = (card->perf_stats.large_send_bytes >> 10);
6037         data[14] = card->perf_stats.large_send_cnt;
6038         data[15] = card->perf_stats.sc_dp_p;
6039         data[16] = card->perf_stats.sc_p_dp;
6040         data[17] = QETH_LOW_WATERMARK_PACK;
6041         data[18] = QETH_HIGH_WATERMARK_PACK;
6042         data[19] = atomic_read(&card->qdio.out_qs[0]->used_buffers);
6043         data[20] = (card->qdio.no_out_queues > 1) ?
6044                         atomic_read(&card->qdio.out_qs[1]->used_buffers) : 0;
6045         data[21] = (card->qdio.no_out_queues > 2) ?
6046                         atomic_read(&card->qdio.out_qs[2]->used_buffers) : 0;
6047         data[22] = (card->qdio.no_out_queues > 3) ?
6048                         atomic_read(&card->qdio.out_qs[3]->used_buffers) : 0;
6049         data[23] = card->perf_stats.inbound_time;
6050         data[24] = card->perf_stats.inbound_cnt;
6051         data[25] = card->perf_stats.inbound_do_qdio_time;
6052         data[26] = card->perf_stats.inbound_do_qdio_cnt;
6053         data[27] = card->perf_stats.outbound_handler_time;
6054         data[28] = card->perf_stats.outbound_handler_cnt;
6055         data[29] = card->perf_stats.outbound_time;
6056         data[30] = card->perf_stats.outbound_cnt;
6057         data[31] = card->perf_stats.outbound_do_qdio_time;
6058         data[32] = card->perf_stats.outbound_do_qdio_cnt;
6059         data[33] = card->perf_stats.tx_csum;
6060         data[34] = card->perf_stats.tx_lin;
6061         data[35] = card->perf_stats.tx_linfail;
6062         data[36] = card->perf_stats.cq_cnt;
6063         data[37] = card->perf_stats.cq_time;
6064         data[38] = card->perf_stats.rx_csum;
6065 }
6066 EXPORT_SYMBOL_GPL(qeth_core_get_ethtool_stats);
6067
6068 void qeth_core_get_strings(struct net_device *dev, u32 stringset, u8 *data)
6069 {
6070         switch (stringset) {
6071         case ETH_SS_STATS:
6072                 memcpy(data, &qeth_ethtool_stats_keys,
6073                         sizeof(qeth_ethtool_stats_keys));
6074                 break;
6075         default:
6076                 WARN_ON(1);
6077                 break;
6078         }
6079 }
6080 EXPORT_SYMBOL_GPL(qeth_core_get_strings);
6081
6082 void qeth_core_get_drvinfo(struct net_device *dev,
6083                 struct ethtool_drvinfo *info)
6084 {
6085         struct qeth_card *card = dev->ml_priv;
6086
6087         strlcpy(info->driver, IS_LAYER2(card) ? "qeth_l2" : "qeth_l3",
6088                 sizeof(info->driver));
6089         strlcpy(info->version, "1.0", sizeof(info->version));
6090         strlcpy(info->fw_version, card->info.mcl_level,
6091                 sizeof(info->fw_version));
6092         snprintf(info->bus_info, sizeof(info->bus_info), "%s/%s/%s",
6093                  CARD_RDEV_ID(card), CARD_WDEV_ID(card), CARD_DDEV_ID(card));
6094 }
6095 EXPORT_SYMBOL_GPL(qeth_core_get_drvinfo);
6096
6097 /* Helper function to fill 'advertising' and 'supported' which are the same. */
6098 /* Autoneg and full-duplex are supported and advertised unconditionally.     */
6099 /* Always advertise and support all speeds up to specified, and only one     */
6100 /* specified port type.                                                      */
6101 static void qeth_set_cmd_adv_sup(struct ethtool_link_ksettings *cmd,
6102                                 int maxspeed, int porttype)
6103 {
6104         ethtool_link_ksettings_zero_link_mode(cmd, supported);
6105         ethtool_link_ksettings_zero_link_mode(cmd, advertising);
6106         ethtool_link_ksettings_zero_link_mode(cmd, lp_advertising);
6107
6108         ethtool_link_ksettings_add_link_mode(cmd, supported, Autoneg);
6109         ethtool_link_ksettings_add_link_mode(cmd, advertising, Autoneg);
6110
6111         switch (porttype) {
6112         case PORT_TP:
6113                 ethtool_link_ksettings_add_link_mode(cmd, supported, TP);
6114                 ethtool_link_ksettings_add_link_mode(cmd, advertising, TP);
6115                 break;
6116         case PORT_FIBRE:
6117                 ethtool_link_ksettings_add_link_mode(cmd, supported, FIBRE);
6118                 ethtool_link_ksettings_add_link_mode(cmd, advertising, FIBRE);
6119                 break;
6120         default:
6121                 ethtool_link_ksettings_add_link_mode(cmd, supported, TP);
6122                 ethtool_link_ksettings_add_link_mode(cmd, advertising, TP);
6123                 WARN_ON_ONCE(1);
6124         }
6125
6126         /* partially does fall through, to also select lower speeds */
6127         switch (maxspeed) {
6128         case SPEED_25000:
6129                 ethtool_link_ksettings_add_link_mode(cmd, supported,
6130                                                      25000baseSR_Full);
6131                 ethtool_link_ksettings_add_link_mode(cmd, advertising,
6132                                                      25000baseSR_Full);
6133                 break;
6134         case SPEED_10000:
6135                 ethtool_link_ksettings_add_link_mode(cmd, supported,
6136                                                      10000baseT_Full);
6137                 ethtool_link_ksettings_add_link_mode(cmd, advertising,
6138                                                      10000baseT_Full);
6139         case SPEED_1000:
6140                 ethtool_link_ksettings_add_link_mode(cmd, supported,
6141                                                      1000baseT_Full);
6142                 ethtool_link_ksettings_add_link_mode(cmd, advertising,
6143                                                      1000baseT_Full);
6144                 ethtool_link_ksettings_add_link_mode(cmd, supported,
6145                                                      1000baseT_Half);
6146                 ethtool_link_ksettings_add_link_mode(cmd, advertising,
6147                                                      1000baseT_Half);
6148         case SPEED_100:
6149                 ethtool_link_ksettings_add_link_mode(cmd, supported,
6150                                                      100baseT_Full);
6151                 ethtool_link_ksettings_add_link_mode(cmd, advertising,
6152                                                      100baseT_Full);
6153                 ethtool_link_ksettings_add_link_mode(cmd, supported,
6154                                                      100baseT_Half);
6155                 ethtool_link_ksettings_add_link_mode(cmd, advertising,
6156                                                      100baseT_Half);
6157         case SPEED_10:
6158                 ethtool_link_ksettings_add_link_mode(cmd, supported,
6159                                                      10baseT_Full);
6160                 ethtool_link_ksettings_add_link_mode(cmd, advertising,
6161                                                      10baseT_Full);
6162                 ethtool_link_ksettings_add_link_mode(cmd, supported,
6163                                                      10baseT_Half);
6164                 ethtool_link_ksettings_add_link_mode(cmd, advertising,
6165                                                      10baseT_Half);
6166                 /* end fallthrough */
6167                 break;
6168         default:
6169                 ethtool_link_ksettings_add_link_mode(cmd, supported,
6170                                                      10baseT_Full);
6171                 ethtool_link_ksettings_add_link_mode(cmd, advertising,
6172                                                      10baseT_Full);
6173                 ethtool_link_ksettings_add_link_mode(cmd, supported,
6174                                                      10baseT_Half);
6175                 ethtool_link_ksettings_add_link_mode(cmd, advertising,
6176                                                      10baseT_Half);
6177                 WARN_ON_ONCE(1);
6178         }
6179 }
6180
6181 int qeth_core_ethtool_get_link_ksettings(struct net_device *netdev,
6182                 struct ethtool_link_ksettings *cmd)
6183 {
6184         struct qeth_card *card = netdev->ml_priv;
6185         enum qeth_link_types link_type;
6186         struct carrier_info carrier_info;
6187         int rc;
6188
6189         if ((card->info.type == QETH_CARD_TYPE_IQD) || (card->info.guestlan))
6190                 link_type = QETH_LINK_TYPE_10GBIT_ETH;
6191         else
6192                 link_type = card->info.link_type;
6193
6194         cmd->base.duplex = DUPLEX_FULL;
6195         cmd->base.autoneg = AUTONEG_ENABLE;
6196         cmd->base.phy_address = 0;
6197         cmd->base.mdio_support = 0;
6198         cmd->base.eth_tp_mdix = ETH_TP_MDI_INVALID;
6199         cmd->base.eth_tp_mdix_ctrl = ETH_TP_MDI_INVALID;
6200
6201         switch (link_type) {
6202         case QETH_LINK_TYPE_FAST_ETH:
6203         case QETH_LINK_TYPE_LANE_ETH100:
6204                 cmd->base.speed = SPEED_100;
6205                 cmd->base.port = PORT_TP;
6206                 break;
6207         case QETH_LINK_TYPE_GBIT_ETH:
6208         case QETH_LINK_TYPE_LANE_ETH1000:
6209                 cmd->base.speed = SPEED_1000;
6210                 cmd->base.port = PORT_FIBRE;
6211                 break;
6212         case QETH_LINK_TYPE_10GBIT_ETH:
6213                 cmd->base.speed = SPEED_10000;
6214                 cmd->base.port = PORT_FIBRE;
6215                 break;
6216         case QETH_LINK_TYPE_25GBIT_ETH:
6217                 cmd->base.speed = SPEED_25000;
6218                 cmd->base.port = PORT_FIBRE;
6219                 break;
6220         default:
6221                 cmd->base.speed = SPEED_10;
6222                 cmd->base.port = PORT_TP;
6223         }
6224         qeth_set_cmd_adv_sup(cmd, cmd->base.speed, cmd->base.port);
6225
6226         /* Check if we can obtain more accurate information.     */
6227         /* If QUERY_CARD_INFO command is not supported or fails, */
6228         /* just return the heuristics that was filled above.     */
6229         rc = qeth_query_card_info(card, &carrier_info);
6230         if (rc == -EOPNOTSUPP) /* for old hardware, return heuristic */
6231                 return 0;
6232         if (rc) /* report error from the hardware operation */
6233                 return rc;
6234         /* on success, fill in the information got from the hardware */
6235
6236         netdev_dbg(netdev,
6237         "card info: card_type=0x%02x, port_mode=0x%04x, port_speed=0x%08x\n",
6238                         carrier_info.card_type,
6239                         carrier_info.port_mode,
6240                         carrier_info.port_speed);
6241
6242         /* Update attributes for which we've obtained more authoritative */
6243         /* information, leave the rest the way they where filled above.  */
6244         switch (carrier_info.card_type) {
6245         case CARD_INFO_TYPE_1G_COPPER_A:
6246         case CARD_INFO_TYPE_1G_COPPER_B:
6247                 cmd->base.port = PORT_TP;
6248                 qeth_set_cmd_adv_sup(cmd, SPEED_1000, cmd->base.port);
6249                 break;
6250         case CARD_INFO_TYPE_1G_FIBRE_A:
6251         case CARD_INFO_TYPE_1G_FIBRE_B:
6252                 cmd->base.port = PORT_FIBRE;
6253                 qeth_set_cmd_adv_sup(cmd, SPEED_1000, cmd->base.port);
6254                 break;
6255         case CARD_INFO_TYPE_10G_FIBRE_A:
6256         case CARD_INFO_TYPE_10G_FIBRE_B:
6257                 cmd->base.port = PORT_FIBRE;
6258                 qeth_set_cmd_adv_sup(cmd, SPEED_10000, cmd->base.port);
6259                 break;
6260         }
6261
6262         switch (carrier_info.port_mode) {
6263         case CARD_INFO_PORTM_FULLDUPLEX:
6264                 cmd->base.duplex = DUPLEX_FULL;
6265                 break;
6266         case CARD_INFO_PORTM_HALFDUPLEX:
6267                 cmd->base.duplex = DUPLEX_HALF;
6268                 break;
6269         }
6270
6271         switch (carrier_info.port_speed) {
6272         case CARD_INFO_PORTS_10M:
6273                 cmd->base.speed = SPEED_10;
6274                 break;
6275         case CARD_INFO_PORTS_100M:
6276                 cmd->base.speed = SPEED_100;
6277                 break;
6278         case CARD_INFO_PORTS_1G:
6279                 cmd->base.speed = SPEED_1000;
6280                 break;
6281         case CARD_INFO_PORTS_10G:
6282                 cmd->base.speed = SPEED_10000;
6283                 break;
6284         case CARD_INFO_PORTS_25G:
6285                 cmd->base.speed = SPEED_25000;
6286                 break;
6287         }
6288
6289         return 0;
6290 }
6291 EXPORT_SYMBOL_GPL(qeth_core_ethtool_get_link_ksettings);
6292
6293 static int qeth_start_csum_cb(struct qeth_card *card, struct qeth_reply *reply,
6294                               unsigned long data)
6295 {
6296         struct qeth_ipa_cmd *cmd = (struct qeth_ipa_cmd *) data;
6297         u32 *features = reply->param;
6298
6299         if (qeth_setassparms_inspect_rc(cmd))
6300                 return 0;
6301
6302         *features = cmd->data.setassparms.data.flags_32bit;
6303         return 0;
6304 }
6305
6306 static int qeth_set_csum_off(struct qeth_card *card, enum qeth_ipa_funcs cstype,
6307                              enum qeth_prot_versions prot)
6308 {
6309         return qeth_send_simple_setassparms_prot(card, cstype,
6310                                                  IPA_CMD_ASS_STOP, 0, prot);
6311 }
6312
6313 static int qeth_set_csum_on(struct qeth_card *card, enum qeth_ipa_funcs cstype,
6314                             enum qeth_prot_versions prot)
6315 {
6316         u32 required_features = QETH_IPA_CHECKSUM_UDP | QETH_IPA_CHECKSUM_TCP;
6317         struct qeth_cmd_buffer *iob;
6318         struct qeth_ipa_caps caps;
6319         u32 features;
6320         int rc;
6321
6322         /* some L3 HW requires combined L3+L4 csum offload: */
6323         if (IS_LAYER3(card) && prot == QETH_PROT_IPV4 &&
6324             cstype == IPA_OUTBOUND_CHECKSUM)
6325                 required_features |= QETH_IPA_CHECKSUM_IP_HDR;
6326
6327         iob = qeth_get_setassparms_cmd(card, cstype, IPA_CMD_ASS_START, 0,
6328                                        prot);
6329         if (!iob)
6330                 return -ENOMEM;
6331
6332         rc = qeth_send_ipa_cmd(card, iob, qeth_start_csum_cb, &features);
6333         if (rc)
6334                 return rc;
6335
6336         if ((required_features & features) != required_features) {
6337                 qeth_set_csum_off(card, cstype, prot);
6338                 return -EOPNOTSUPP;
6339         }
6340
6341         iob = qeth_get_setassparms_cmd(card, cstype, IPA_CMD_ASS_ENABLE, 4,
6342                                        prot);
6343         if (!iob) {
6344                 qeth_set_csum_off(card, cstype, prot);
6345                 return -ENOMEM;
6346         }
6347
6348         if (features & QETH_IPA_CHECKSUM_LP2LP)
6349                 required_features |= QETH_IPA_CHECKSUM_LP2LP;
6350         __ipa_cmd(iob)->data.setassparms.data.flags_32bit = required_features;
6351         rc = qeth_send_ipa_cmd(card, iob, qeth_setassparms_get_caps_cb, &caps);
6352         if (rc) {
6353                 qeth_set_csum_off(card, cstype, prot);
6354                 return rc;
6355         }
6356
6357         if (!qeth_ipa_caps_supported(&caps, required_features) ||
6358             !qeth_ipa_caps_enabled(&caps, required_features)) {
6359                 qeth_set_csum_off(card, cstype, prot);
6360                 return -EOPNOTSUPP;
6361         }
6362
6363         dev_info(&card->gdev->dev, "HW Checksumming (%sbound IPv%d) enabled\n",
6364                  cstype == IPA_INBOUND_CHECKSUM ? "in" : "out", prot);
6365         if (!qeth_ipa_caps_enabled(&caps, QETH_IPA_CHECKSUM_LP2LP) &&
6366             cstype == IPA_OUTBOUND_CHECKSUM)
6367                 dev_warn(&card->gdev->dev,
6368                          "Hardware checksumming is performed only if %s and its peer use different OSA Express 3 ports\n",
6369                          QETH_CARD_IFNAME(card));
6370         return 0;
6371 }
6372
6373 static int qeth_set_ipa_csum(struct qeth_card *card, bool on, int cstype,
6374                              enum qeth_prot_versions prot)
6375 {
6376         int rc = (on) ? qeth_set_csum_on(card, cstype, prot) :
6377                         qeth_set_csum_off(card, cstype, prot);
6378         return rc ? -EIO : 0;
6379 }
6380
6381 static int qeth_start_tso_cb(struct qeth_card *card, struct qeth_reply *reply,
6382                              unsigned long data)
6383 {
6384         struct qeth_ipa_cmd *cmd = (struct qeth_ipa_cmd *) data;
6385         struct qeth_tso_start_data *tso_data = reply->param;
6386
6387         if (qeth_setassparms_inspect_rc(cmd))
6388                 return 0;
6389
6390         tso_data->mss = cmd->data.setassparms.data.tso.mss;
6391         tso_data->supported = cmd->data.setassparms.data.tso.supported;
6392         return 0;
6393 }
6394
6395 static int qeth_set_tso_off(struct qeth_card *card,
6396                             enum qeth_prot_versions prot)
6397 {
6398         return qeth_send_simple_setassparms_prot(card, IPA_OUTBOUND_TSO,
6399                                                  IPA_CMD_ASS_STOP, 0, prot);
6400 }
6401
6402 static int qeth_set_tso_on(struct qeth_card *card,
6403                            enum qeth_prot_versions prot)
6404 {
6405         struct qeth_tso_start_data tso_data;
6406         struct qeth_cmd_buffer *iob;
6407         struct qeth_ipa_caps caps;
6408         int rc;
6409
6410         iob = qeth_get_setassparms_cmd(card, IPA_OUTBOUND_TSO,
6411                                        IPA_CMD_ASS_START, 0, prot);
6412         if (!iob)
6413                 return -ENOMEM;
6414
6415         rc = qeth_send_ipa_cmd(card, iob, qeth_start_tso_cb, &tso_data);
6416         if (rc)
6417                 return rc;
6418
6419         if (!tso_data.mss || !(tso_data.supported & QETH_IPA_LARGE_SEND_TCP)) {
6420                 qeth_set_tso_off(card, prot);
6421                 return -EOPNOTSUPP;
6422         }
6423
6424         iob = qeth_get_setassparms_cmd(card, IPA_OUTBOUND_TSO,
6425                                        IPA_CMD_ASS_ENABLE, sizeof(caps), prot);
6426         if (!iob) {
6427                 qeth_set_tso_off(card, prot);
6428                 return -ENOMEM;
6429         }
6430
6431         /* enable TSO capability */
6432         __ipa_cmd(iob)->data.setassparms.data.caps.enabled =
6433                 QETH_IPA_LARGE_SEND_TCP;
6434         rc = qeth_send_ipa_cmd(card, iob, qeth_setassparms_get_caps_cb, &caps);
6435         if (rc) {
6436                 qeth_set_tso_off(card, prot);
6437                 return rc;
6438         }
6439
6440         if (!qeth_ipa_caps_supported(&caps, QETH_IPA_LARGE_SEND_TCP) ||
6441             !qeth_ipa_caps_enabled(&caps, QETH_IPA_LARGE_SEND_TCP)) {
6442                 qeth_set_tso_off(card, prot);
6443                 return -EOPNOTSUPP;
6444         }
6445
6446         dev_info(&card->gdev->dev, "TSOv%u enabled (MSS: %u)\n", prot,
6447                  tso_data.mss);
6448         return 0;
6449 }
6450
6451 static int qeth_set_ipa_tso(struct qeth_card *card, bool on,
6452                             enum qeth_prot_versions prot)
6453 {
6454         int rc = on ? qeth_set_tso_on(card, prot) :
6455                       qeth_set_tso_off(card, prot);
6456
6457         return rc ? -EIO : 0;
6458 }
6459
6460 static int qeth_set_ipa_rx_csum(struct qeth_card *card, bool on)
6461 {
6462         int rc_ipv4 = (on) ? -EOPNOTSUPP : 0;
6463         int rc_ipv6;
6464
6465         if (qeth_is_supported(card, IPA_INBOUND_CHECKSUM))
6466                 rc_ipv4 = qeth_set_ipa_csum(card, on, IPA_INBOUND_CHECKSUM,
6467                                             QETH_PROT_IPV4);
6468         if (!qeth_is_supported6(card, IPA_INBOUND_CHECKSUM_V6))
6469                 /* no/one Offload Assist available, so the rc is trivial */
6470                 return rc_ipv4;
6471
6472         rc_ipv6 = qeth_set_ipa_csum(card, on, IPA_INBOUND_CHECKSUM,
6473                                     QETH_PROT_IPV6);
6474
6475         if (on)
6476                 /* enable: success if any Assist is active */
6477                 return (rc_ipv6) ? rc_ipv4 : 0;
6478
6479         /* disable: failure if any Assist is still active */
6480         return (rc_ipv6) ? rc_ipv6 : rc_ipv4;
6481 }
6482
6483 /**
6484  * qeth_enable_hw_features() - (Re-)Enable HW functions for device features
6485  * @dev:        a net_device
6486  */
6487 void qeth_enable_hw_features(struct net_device *dev)
6488 {
6489         struct qeth_card *card = dev->ml_priv;
6490         netdev_features_t features;
6491
6492         features = dev->features;
6493         /* force-off any feature that might need an IPA sequence.
6494          * netdev_update_features() will restart them.
6495          */
6496         dev->features &= ~dev->hw_features;
6497         /* toggle VLAN filter, so that VIDs are re-programmed: */
6498         if (IS_LAYER2(card) && IS_VM_NIC(card)) {
6499                 dev->features &= ~NETIF_F_HW_VLAN_CTAG_FILTER;
6500                 dev->wanted_features |= NETIF_F_HW_VLAN_CTAG_FILTER;
6501         }
6502         netdev_update_features(dev);
6503         if (features != dev->features)
6504                 dev_warn(&card->gdev->dev,
6505                          "Device recovery failed to restore all offload features\n");
6506 }
6507 EXPORT_SYMBOL_GPL(qeth_enable_hw_features);
6508
6509 int qeth_set_features(struct net_device *dev, netdev_features_t features)
6510 {
6511         struct qeth_card *card = dev->ml_priv;
6512         netdev_features_t changed = dev->features ^ features;
6513         int rc = 0;
6514
6515         QETH_DBF_TEXT(SETUP, 2, "setfeat");
6516         QETH_DBF_HEX(SETUP, 2, &features, sizeof(features));
6517
6518         if ((changed & NETIF_F_IP_CSUM)) {
6519                 rc = qeth_set_ipa_csum(card, features & NETIF_F_IP_CSUM,
6520                                        IPA_OUTBOUND_CHECKSUM, QETH_PROT_IPV4);
6521                 if (rc)
6522                         changed ^= NETIF_F_IP_CSUM;
6523         }
6524         if (changed & NETIF_F_IPV6_CSUM) {
6525                 rc = qeth_set_ipa_csum(card, features & NETIF_F_IPV6_CSUM,
6526                                        IPA_OUTBOUND_CHECKSUM, QETH_PROT_IPV6);
6527                 if (rc)
6528                         changed ^= NETIF_F_IPV6_CSUM;
6529         }
6530         if (changed & NETIF_F_RXCSUM) {
6531                 rc = qeth_set_ipa_rx_csum(card, features & NETIF_F_RXCSUM);
6532                 if (rc)
6533                         changed ^= NETIF_F_RXCSUM;
6534         }
6535         if (changed & NETIF_F_TSO) {
6536                 rc = qeth_set_ipa_tso(card, features & NETIF_F_TSO,
6537                                       QETH_PROT_IPV4);
6538                 if (rc)
6539                         changed ^= NETIF_F_TSO;
6540         }
6541         if (changed & NETIF_F_TSO6) {
6542                 rc = qeth_set_ipa_tso(card, features & NETIF_F_TSO6,
6543                                       QETH_PROT_IPV6);
6544                 if (rc)
6545                         changed ^= NETIF_F_TSO6;
6546         }
6547
6548         /* everything changed successfully? */
6549         if ((dev->features ^ features) == changed)
6550                 return 0;
6551         /* something went wrong. save changed features and return error */
6552         dev->features ^= changed;
6553         return -EIO;
6554 }
6555 EXPORT_SYMBOL_GPL(qeth_set_features);
6556
6557 netdev_features_t qeth_fix_features(struct net_device *dev,
6558                                     netdev_features_t features)
6559 {
6560         struct qeth_card *card = dev->ml_priv;
6561
6562         QETH_DBF_TEXT(SETUP, 2, "fixfeat");
6563         if (!qeth_is_supported(card, IPA_OUTBOUND_CHECKSUM))
6564                 features &= ~NETIF_F_IP_CSUM;
6565         if (!qeth_is_supported6(card, IPA_OUTBOUND_CHECKSUM_V6))
6566                 features &= ~NETIF_F_IPV6_CSUM;
6567         if (!qeth_is_supported(card, IPA_INBOUND_CHECKSUM) &&
6568             !qeth_is_supported6(card, IPA_INBOUND_CHECKSUM_V6))
6569                 features &= ~NETIF_F_RXCSUM;
6570         if (!qeth_is_supported(card, IPA_OUTBOUND_TSO))
6571                 features &= ~NETIF_F_TSO;
6572         if (!qeth_is_supported6(card, IPA_OUTBOUND_TSO))
6573                 features &= ~NETIF_F_TSO6;
6574
6575         QETH_DBF_HEX(SETUP, 2, &features, sizeof(features));
6576         return features;
6577 }
6578 EXPORT_SYMBOL_GPL(qeth_fix_features);
6579
6580 netdev_features_t qeth_features_check(struct sk_buff *skb,
6581                                       struct net_device *dev,
6582                                       netdev_features_t features)
6583 {
6584         /* GSO segmentation builds skbs with
6585          *      a (small) linear part for the headers, and
6586          *      page frags for the data.
6587          * Compared to a linear skb, the header-only part consumes an
6588          * additional buffer element. This reduces buffer utilization, and
6589          * hurts throughput. So compress small segments into one element.
6590          */
6591         if (netif_needs_gso(skb, features)) {
6592                 /* match skb_segment(): */
6593                 unsigned int doffset = skb->data - skb_mac_header(skb);
6594                 unsigned int hsize = skb_shinfo(skb)->gso_size;
6595                 unsigned int hroom = skb_headroom(skb);
6596
6597                 /* linearize only if resulting skb allocations are order-0: */
6598                 if (SKB_DATA_ALIGN(hroom + doffset + hsize) <= SKB_MAX_HEAD(0))
6599                         features &= ~NETIF_F_SG;
6600         }
6601
6602         return vlan_features_check(skb, features);
6603 }
6604 EXPORT_SYMBOL_GPL(qeth_features_check);
6605
6606 int qeth_open(struct net_device *dev)
6607 {
6608         struct qeth_card *card = dev->ml_priv;
6609
6610         QETH_CARD_TEXT(card, 4, "qethopen");
6611         if (card->state == CARD_STATE_UP)
6612                 return 0;
6613         if (card->state != CARD_STATE_SOFTSETUP)
6614                 return -ENODEV;
6615
6616         if (qdio_stop_irq(CARD_DDEV(card), 0) < 0)
6617                 return -EIO;
6618
6619         card->data.state = CH_STATE_UP;
6620         card->state = CARD_STATE_UP;
6621         netif_start_queue(dev);
6622
6623         napi_enable(&card->napi);
6624         local_bh_disable();
6625         napi_schedule(&card->napi);
6626         /* kick-start the NAPI softirq: */
6627         local_bh_enable();
6628         return 0;
6629 }
6630 EXPORT_SYMBOL_GPL(qeth_open);
6631
6632 int qeth_stop(struct net_device *dev)
6633 {
6634         struct qeth_card *card = dev->ml_priv;
6635
6636         QETH_CARD_TEXT(card, 4, "qethstop");
6637         netif_tx_disable(dev);
6638         if (card->state == CARD_STATE_UP) {
6639                 card->state = CARD_STATE_SOFTSETUP;
6640                 napi_disable(&card->napi);
6641         }
6642         return 0;
6643 }
6644 EXPORT_SYMBOL_GPL(qeth_stop);
6645
6646 static int __init qeth_core_init(void)
6647 {
6648         int rc;
6649
6650         pr_info("loading core functions\n");
6651
6652         qeth_wq = create_singlethread_workqueue("qeth_wq");
6653         if (!qeth_wq) {
6654                 rc = -ENOMEM;
6655                 goto out_err;
6656         }
6657
6658         rc = qeth_register_dbf_views();
6659         if (rc)
6660                 goto dbf_err;
6661         qeth_core_root_dev = root_device_register("qeth");
6662         rc = PTR_ERR_OR_ZERO(qeth_core_root_dev);
6663         if (rc)
6664                 goto register_err;
6665         qeth_core_header_cache =
6666                 kmem_cache_create("qeth_hdr", QETH_HDR_CACHE_OBJ_SIZE,
6667                                   roundup_pow_of_two(QETH_HDR_CACHE_OBJ_SIZE),
6668                                   0, NULL);
6669         if (!qeth_core_header_cache) {
6670                 rc = -ENOMEM;
6671                 goto slab_err;
6672         }
6673         qeth_qdio_outbuf_cache = kmem_cache_create("qeth_buf",
6674                         sizeof(struct qeth_qdio_out_buffer), 0, 0, NULL);
6675         if (!qeth_qdio_outbuf_cache) {
6676                 rc = -ENOMEM;
6677                 goto cqslab_err;
6678         }
6679         rc = ccw_driver_register(&qeth_ccw_driver);
6680         if (rc)
6681                 goto ccw_err;
6682         rc = ccwgroup_driver_register(&qeth_core_ccwgroup_driver);
6683         if (rc)
6684                 goto ccwgroup_err;
6685
6686         return 0;
6687
6688 ccwgroup_err:
6689         ccw_driver_unregister(&qeth_ccw_driver);
6690 ccw_err:
6691         kmem_cache_destroy(qeth_qdio_outbuf_cache);
6692 cqslab_err:
6693         kmem_cache_destroy(qeth_core_header_cache);
6694 slab_err:
6695         root_device_unregister(qeth_core_root_dev);
6696 register_err:
6697         qeth_unregister_dbf_views();
6698 dbf_err:
6699         destroy_workqueue(qeth_wq);
6700 out_err:
6701         pr_err("Initializing the qeth device driver failed\n");
6702         return rc;
6703 }
6704
6705 static void __exit qeth_core_exit(void)
6706 {
6707         qeth_clear_dbf_list();
6708         destroy_workqueue(qeth_wq);
6709         ccwgroup_driver_unregister(&qeth_core_ccwgroup_driver);
6710         ccw_driver_unregister(&qeth_ccw_driver);
6711         kmem_cache_destroy(qeth_qdio_outbuf_cache);
6712         kmem_cache_destroy(qeth_core_header_cache);
6713         root_device_unregister(qeth_core_root_dev);
6714         qeth_unregister_dbf_views();
6715         pr_info("core functions removed\n");
6716 }
6717
6718 module_init(qeth_core_init);
6719 module_exit(qeth_core_exit);
6720 MODULE_AUTHOR("Frank Blaschka <frank.blaschka@de.ibm.com>");
6721 MODULE_DESCRIPTION("qeth core functions");
6722 MODULE_LICENSE("GPL");