drivers/scsi/libfc/fc_exch.c

   1 /*
   2  * Copyright(c) 2007 Intel Corporation. All rights reserved.
   3  * Copyright(c) 2008 Red Hat, Inc.  All rights reserved.
   4  * Copyright(c) 2008 Mike Christie
   5  *
   6  * This program is free software; you can redistribute it and/or modify it
   7  * under the terms and conditions of the GNU General Public License,
   8  * version 2, as published by the Free Software Foundation.
   9  *
  10  * This program is distributed in the hope it will be useful, but WITHOUT
  11  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  12  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
  13  * more details.
  14  *
  15  * You should have received a copy of the GNU General Public License along with
  16  * this program; if not, write to the Free Software Foundation, Inc.,
  17  * 51 Franklin St - Fifth Floor, Boston, MA 02110-1301 USA.
  18  *
  19  * Maintained at www.Open-FCoE.org
  20  */
  21
  22 /*
  23  * Fibre Channel exchange and sequence handling.
  24  */
  25
  26 #include <linux/timer.h>
  27 #include <linux/slab.h>
  28 #include <linux/err.h>
  29
  30 #include <scsi/fc/fc_fc2.h>
  31
  32 #include <scsi/libfc.h>
  33 #include <scsi/fc_encode.h>
  34
  35 #include "fc_libfc.h"
  36
  37 u16     fc_cpu_mask;            /* cpu mask for possible cpus */
  38 EXPORT_SYMBOL(fc_cpu_mask);
  39 static u16      fc_cpu_order;   /* 2's power to represent total possible cpus */
  40 static struct kmem_cache *fc_em_cachep;        /* cache for exchanges */
  41 static struct workqueue_struct *fc_exch_workqueue;
  42
  43 /*
  44  * Structure and function definitions for managing Fibre Channel Exchanges
  45  * and Sequences.
  46  *
  47  * The three primary structures used here are fc_exch_mgr, fc_exch, and fc_seq.
  48  *
  49  * fc_exch_mgr holds the exchange state for an N port
  50  *
  51  * fc_exch holds state for one exchange and links to its active sequence.
  52  *
  53  * fc_seq holds the state for an individual sequence.
  54  */
  55
  56 /**
  57  * struct fc_exch_pool - Per cpu exchange pool
  58  * @next_index:   Next possible free exchange index
  59  * @total_exches: Total allocated exchanges
  60  * @lock:         Exch pool lock
  61  * @ex_list:      List of exchanges
  62  *
  63  * This structure manages per cpu exchanges in array of exchange pointers.
  64  * This array is allocated followed by struct fc_exch_pool memory for
  65  * assigned range of exchanges to per cpu pool.
  66  */
  67 struct fc_exch_pool {
  68         spinlock_t       lock;
  69         struct list_head ex_list;
  70         u16              next_index;
  71         u16              total_exches;
  72
  73         /* two cache of free slot in exch array */
  74         u16              left;
  75         u16              right;
  76 } ____cacheline_aligned_in_smp;
  77
  78 /**
  79  * struct fc_exch_mgr - The Exchange Manager (EM).
  80  * @class:          Default class for new sequences
  81  * @kref:           Reference counter
  82  * @min_xid:        Minimum exchange ID
  83  * @max_xid:        Maximum exchange ID
  84  * @ep_pool:        Reserved exchange pointers
  85  * @pool_max_index: Max exch array index in exch pool
  86  * @pool:           Per cpu exch pool
  87  * @stats:          Statistics structure
  88  *
  89  * This structure is the center for creating exchanges and sequences.
  90  * It manages the allocation of exchange IDs.
  91  */
  92 struct fc_exch_mgr {
  93         struct fc_exch_pool *pool;
  94         mempool_t       *ep_pool;
  95         enum fc_class   class;
  96         struct kref     kref;
  97         u16             min_xid;
  98         u16             max_xid;
  99         u16             pool_max_index;
 100
 101         /*
 102          * currently exchange mgr stats are updated but not used.
 103          * either stats can be expose via sysfs or remove them
 104          * all together if not used XXX
 105          */
 106         struct {
 107                 atomic_t no_free_exch;
 108                 atomic_t no_free_exch_xid;
 109                 atomic_t xid_not_found;
 110                 atomic_t xid_busy;
 111                 atomic_t seq_not_found;
 112                 atomic_t non_bls_resp;
 113         } stats;
 114 };
 115
 116 /**
 117  * struct fc_exch_mgr_anchor - primary structure for list of EMs
 118  * @ema_list: Exchange Manager Anchor list
 119  * @mp:       Exchange Manager associated with this anchor
 120  * @match:    Routine to determine if this anchor's EM should be used
 121  *
 122  * When walking the list of anchors the match routine will be called
 123  * for each anchor to determine if that EM should be used. The last
 124  * anchor in the list will always match to handle any exchanges not
 125  * handled by other EMs. The non-default EMs would be added to the
 126  * anchor list by HW that provides FCoE offloads.
 127  */
 128 struct fc_exch_mgr_anchor {
 129         struct list_head ema_list;
 130         struct fc_exch_mgr *mp;
 131         bool (*match)(struct fc_frame *);
 132 };
 133
 134 static void fc_exch_rrq(struct fc_exch *);
 135 static void fc_seq_ls_acc(struct fc_frame *);
 136 static void fc_seq_ls_rjt(struct fc_frame *, enum fc_els_rjt_reason,
 137                           enum fc_els_rjt_explan);
 138 static void fc_exch_els_rec(struct fc_frame *);
 139 static void fc_exch_els_rrq(struct fc_frame *);
 140
 141 /*
 142  * Internal implementation notes.
 143  *
 144  * The exchange manager is one by default in libfc but LLD may choose
 145  * to have one per CPU. The sequence manager is one per exchange manager
 146  * and currently never separated.
 147  *
 148  * Section 9.8 in FC-FS-2 specifies:  "The SEQ_ID is a one-byte field
 149  * assigned by the Sequence Initiator that shall be unique for a specific
 150  * D_ID and S_ID pair while the Sequence is open."   Note that it isn't
 151  * qualified by exchange ID, which one might think it would be.
 152  * In practice this limits the number of open sequences and exchanges to 256
 153  * per session.  For most targets we could treat this limit as per exchange.
 154  *
 155  * The exchange and its sequence are freed when the last sequence is received.
 156  * It's possible for the remote port to leave an exchange open without
 157  * sending any sequences.
 158  *
 159  * Notes on reference counts:
 160  *
 161  * Exchanges are reference counted and exchange gets freed when the reference
 162  * count becomes zero.
 163  *
 164  * Timeouts:
 165  * Sequences are timed out for E_D_TOV and R_A_TOV.
 166  *
 167  * Sequence event handling:
 168  *
 169  * The following events may occur on initiator sequences:
 170  *
 171  *      Send.
 172  *          For now, the whole thing is sent.
 173  *      Receive ACK
 174  *          This applies only to class F.
 175  *          The sequence is marked complete.
 176  *      ULP completion.
 177  *          The upper layer calls fc_exch_done() when done
 178  *          with exchange and sequence tuple.
 179  *      RX-inferred completion.
 180  *          When we receive the next sequence on the same exchange, we can
 181  *          retire the previous sequence ID.  (XXX not implemented).
 182  *      Timeout.
 183  *          R_A_TOV frees the sequence ID.  If we're waiting for ACK,
 184  *          E_D_TOV causes abort and calls upper layer response handler
 185  *          with FC_EX_TIMEOUT error.
 186  *      Receive RJT
 187  *          XXX defer.
 188  *      Send ABTS
 189  *          On timeout.
 190  *
 191  * The following events may occur on recipient sequences:
 192  *
 193  *      Receive
 194  *          Allocate sequence for first frame received.
 195  *          Hold during receive handler.
 196  *          Release when final frame received.
 197  *          Keep status of last N of these for the ELS RES command.  XXX TBD.
 198  *      Receive ABTS
 199  *          Deallocate sequence
 200  *      Send RJT
 201  *          Deallocate
 202  *
 203  * For now, we neglect conditions where only part of a sequence was
 204  * received or transmitted, or where out-of-order receipt is detected.
 205  */
 206
 207 /*
 208  * Locking notes:
 209  *
 210  * The EM code run in a per-CPU worker thread.
 211  *
 212  * To protect against concurrency between a worker thread code and timers,
 213  * sequence allocation and deallocation must be locked.
 214  *  - exchange refcnt can be done atomicly without locks.
 215  *  - sequence allocation must be locked by exch lock.
 216  *  - If the EM pool lock and ex_lock must be taken at the same time, then the
 217  *    EM pool lock must be taken before the ex_lock.
 218  */
 219
 220 /*
 221  * opcode names for debugging.
 222  */
 223 static char *fc_exch_rctl_names[] = FC_RCTL_NAMES_INIT;
 224
 225 /**
 226  * fc_exch_name_lookup() - Lookup name by opcode
 227  * @op:        Opcode to be looked up
 228  * @table:     Opcode/name table
 229  * @max_index: Index not to be exceeded
 230  *
 231  * This routine is used to determine a human-readable string identifying
 232  * a R_CTL opcode.
 233  */
 234 static inline const char *fc_exch_name_lookup(unsigned int op, char **table,
 235                                               unsigned int max_index)
 236 {
 237         const char *name = NULL;
 238
 239         if (op < max_index)
 240                 name = table[op];
 241         if (!name)
 242                 name = "unknown";
 243         return name;
 244 }
 245
 246 /**
 247  * fc_exch_rctl_name() - Wrapper routine for fc_exch_name_lookup()
 248  * @op: The opcode to be looked up
 249  */
 250 static const char *fc_exch_rctl_name(unsigned int op)
 251 {
 252         return fc_exch_name_lookup(op, fc_exch_rctl_names,
 253                                    ARRAY_SIZE(fc_exch_rctl_names));
 254 }
 255
 256 /**
 257  * fc_exch_hold() - Increment an exchange's reference count
 258  * @ep: Echange to be held
 259  */
 260 static inline void fc_exch_hold(struct fc_exch *ep)
 261 {
 262         atomic_inc(&ep->ex_refcnt);
 263 }
 264
 265 /**
 266  * fc_exch_setup_hdr() - Initialize a FC header by initializing some fields
 267  *                       and determine SOF and EOF.
 268  * @ep:    The exchange to that will use the header
 269  * @fp:    The frame whose header is to be modified
 270  * @f_ctl: F_CTL bits that will be used for the frame header
 271  *
 272  * The fields initialized by this routine are: fh_ox_id, fh_rx_id,
 273  * fh_seq_id, fh_seq_cnt and the SOF and EOF.
 274  */
 275 static void fc_exch_setup_hdr(struct fc_exch *ep, struct fc_frame *fp,
 276                               u32 f_ctl)
 277 {
 278         struct fc_frame_header *fh = fc_frame_header_get(fp);
 279         u16 fill;
 280
 281         fr_sof(fp) = ep->class;
 282         if (ep->seq.cnt)
 283                 fr_sof(fp) = fc_sof_normal(ep->class);
 284
 285         if (f_ctl & FC_FC_END_SEQ) {
 286                 fr_eof(fp) = FC_EOF_T;
 287                 if (fc_sof_needs_ack(ep->class))
 288                         fr_eof(fp) = FC_EOF_N;
 289                 /*
 290                  * From F_CTL.
 291                  * The number of fill bytes to make the length a 4-byte
 292                  * multiple is the low order 2-bits of the f_ctl.
 293                  * The fill itself will have been cleared by the frame
 294                  * allocation.
 295                  * After this, the length will be even, as expected by
 296                  * the transport.
 297                  */
 298                 fill = fr_len(fp) & 3;
 299                 if (fill) {
 300                         fill = 4 - fill;
 301                         /* TODO, this may be a problem with fragmented skb */
 302                         skb_put(fp_skb(fp), fill);
 303                         hton24(fh->fh_f_ctl, f_ctl | fill);
 304                 }
 305         } else {
 306                 WARN_ON(fr_len(fp) % 4 != 0);   /* no pad to non last frame */
 307                 fr_eof(fp) = FC_EOF_N;
 308         }
 309
 310         /*
 311          * Initialize remainig fh fields
 312          * from fc_fill_fc_hdr
 313          */
 314         fh->fh_ox_id = htons(ep->oxid);
 315         fh->fh_rx_id = htons(ep->rxid);
 316         fh->fh_seq_id = ep->seq.id;
 317         fh->fh_seq_cnt = htons(ep->seq.cnt);
 318 }
 319
 320 /**
 321  * fc_exch_release() - Decrement an exchange's reference count
 322  * @ep: Exchange to be released
 323  *
 324  * If the reference count reaches zero and the exchange is complete,
 325  * it is freed.
 326  */
 327 static void fc_exch_release(struct fc_exch *ep)
 328 {
 329         struct fc_exch_mgr *mp;
 330
 331         if (atomic_dec_and_test(&ep->ex_refcnt)) {
 332                 mp = ep->em;
 333                 if (ep->destructor)
 334                         ep->destructor(&ep->seq, ep->arg);
 335                 WARN_ON(!(ep->esb_stat & ESB_ST_COMPLETE));
 336                 mempool_free(ep, mp->ep_pool);
 337         }
 338 }
 339
 340 /**
 341  * fc_exch_done_locked() - Complete an exchange with the exchange lock held
 342  * @ep: The exchange that is complete
 343  */
 344 static int fc_exch_done_locked(struct fc_exch *ep)
 345 {
 346         int rc = 1;
 347
 348         /*
 349          * We must check for completion in case there are two threads
 350          * tyring to complete this. But the rrq code will reuse the
 351          * ep, and in that case we only clear the resp and set it as
 352          * complete, so it can be reused by the timer to send the rrq.
 353          */
 354         ep->resp = NULL;
 355         if (ep->state & FC_EX_DONE)
 356                 return rc;
 357         ep->esb_stat |= ESB_ST_COMPLETE;
 358
 359         if (!(ep->esb_stat & ESB_ST_REC_QUAL)) {
 360                 ep->state |= FC_EX_DONE;
 361                 if (cancel_delayed_work(&ep->timeout_work))
 362                         atomic_dec(&ep->ex_refcnt); /* drop hold for timer */
 363                 rc = 0;
 364         }
 365         return rc;
 366 }
 367
 368 /**
 369  * fc_exch_ptr_get() - Return an exchange from an exchange pool
 370  * @pool:  Exchange Pool to get an exchange from
 371  * @index: Index of the exchange within the pool
 372  *
 373  * Use the index to get an exchange from within an exchange pool. exches
 374  * will point to an array of exchange pointers. The index will select
 375  * the exchange within the array.
 376  */
 377 static inline struct fc_exch *fc_exch_ptr_get(struct fc_exch_pool *pool,
 378                                               u16 index)
 379 {
 380         struct fc_exch **exches = (struct fc_exch **)(pool + 1);
 381         return exches[index];
 382 }
 383
 384 /**
 385  * fc_exch_ptr_set() - Assign an exchange to a slot in an exchange pool
 386  * @pool:  The pool to assign the exchange to
 387  * @index: The index in the pool where the exchange will be assigned
 388  * @ep:    The exchange to assign to the pool
 389  */
 390 static inline void fc_exch_ptr_set(struct fc_exch_pool *pool, u16 index,
 391                                    struct fc_exch *ep)
 392 {
 393         ((struct fc_exch **)(pool + 1))[index] = ep;
 394 }
 395
 396 /**
 397  * fc_exch_delete() - Delete an exchange
 398  * @ep: The exchange to be deleted
 399  */
 400 static void fc_exch_delete(struct fc_exch *ep)
 401 {
 402         struct fc_exch_pool *pool;
 403         u16 index;
 404
 405         pool = ep->pool;
 406         spin_lock_bh(&pool->lock);
 407         WARN_ON(pool->total_exches <= 0);
 408         pool->total_exches--;
 409
 410         /* update cache of free slot */
 411         index = (ep->xid - ep->em->min_xid) >> fc_cpu_order;
 412         if (pool->left == FC_XID_UNKNOWN)
 413                 pool->left = index;
 414         else if (pool->right == FC_XID_UNKNOWN)
 415                 pool->right = index;
 416         else
 417                 pool->next_index = index;
 418
 419         fc_exch_ptr_set(pool, index, NULL);
 420         list_del(&ep->ex_list);
 421         spin_unlock_bh(&pool->lock);
 422         fc_exch_release(ep);    /* drop hold for exch in mp */
 423 }
 424
 425 /**
 426  * fc_exch_timer_set_locked() - Start a timer for an exchange w/ the
 427  *                              the exchange lock held
 428  * @ep:         The exchange whose timer will start
 429  * @timer_msec: The timeout period
 430  *
 431  * Used for upper level protocols to time out the exchange.
 432  * The timer is cancelled when it fires or when the exchange completes.
 433  */
 434 static inline void fc_exch_timer_set_locked(struct fc_exch *ep,
 435                                             unsigned int timer_msec)
 436 {
 437         if (ep->state & (FC_EX_RST_CLEANUP | FC_EX_DONE))
 438                 return;
 439
 440         FC_EXCH_DBG(ep, "Exchange timer armed\n");
 441
 442         if (queue_delayed_work(fc_exch_workqueue, &ep->timeout_work,
 443                                msecs_to_jiffies(timer_msec)))
 444                 fc_exch_hold(ep);               /* hold for timer */
 445 }
 446
 447 /**
 448  * fc_exch_timer_set() - Lock the exchange and set the timer
 449  * @ep:         The exchange whose timer will start
 450  * @timer_msec: The timeout period
 451  */
 452 static void fc_exch_timer_set(struct fc_exch *ep, unsigned int timer_msec)
 453 {
 454         spin_lock_bh(&ep->ex_lock);
 455         fc_exch_timer_set_locked(ep, timer_msec);
 456         spin_unlock_bh(&ep->ex_lock);
 457 }
 458
 459 /**
 460  * fc_seq_send() - Send a frame using existing sequence/exchange pair
 461  * @lport: The local port that the exchange will be sent on
 462  * @sp:    The sequence to be sent
 463  * @fp:    The frame to be sent on the exchange
 464  */
 465 static int fc_seq_send(struct fc_lport *lport, struct fc_seq *sp,
 466                        struct fc_frame *fp)
 467 {
 468         struct fc_exch *ep;
 469         struct fc_frame_header *fh = fc_frame_header_get(fp);
 470         int error;
 471         u32 f_ctl;
 472         u8 fh_type = fh->fh_type;
 473
 474         ep = fc_seq_exch(sp);
 475         WARN_ON((ep->esb_stat & ESB_ST_SEQ_INIT) != ESB_ST_SEQ_INIT);
 476
 477         f_ctl = ntoh24(fh->fh_f_ctl);
 478         fc_exch_setup_hdr(ep, fp, f_ctl);
 479         fr_encaps(fp) = ep->encaps;
 480
 481         /*
 482          * update sequence count if this frame is carrying
 483          * multiple FC frames when sequence offload is enabled
 484          * by LLD.
 485          */
 486         if (fr_max_payload(fp))
 487                 sp->cnt += DIV_ROUND_UP((fr_len(fp) - sizeof(*fh)),
 488                                         fr_max_payload(fp));
 489         else
 490                 sp->cnt++;
 491
 492         /*
 493          * Send the frame.
 494          */
 495         error = lport->tt.frame_send(lport, fp);
 496
 497         if (fh_type == FC_TYPE_BLS)
 498                 return error;
 499
 500         /*
 501          * Update the exchange and sequence flags,
 502          * assuming all frames for the sequence have been sent.
 503          * We can only be called to send once for each sequence.
 504          */
 505         spin_lock_bh(&ep->ex_lock);
 506         ep->f_ctl = f_ctl & ~FC_FC_FIRST_SEQ;   /* not first seq */
 507         if (f_ctl & FC_FC_SEQ_INIT)
 508                 ep->esb_stat &= ~ESB_ST_SEQ_INIT;
 509         spin_unlock_bh(&ep->ex_lock);
 510         return error;
 511 }
 512
 513 /**
 514  * fc_seq_alloc() - Allocate a sequence for a given exchange
 515  * @ep:     The exchange to allocate a new sequence for
 516  * @seq_id: The sequence ID to be used
 517  *
 518  * We don't support multiple originated sequences on the same exchange.
 519  * By implication, any previously originated sequence on this exchange
 520  * is complete, and we reallocate the same sequence.
 521  */
 522 static struct fc_seq *fc_seq_alloc(struct fc_exch *ep, u8 seq_id)
 523 {
 524         struct fc_seq *sp;
 525
 526         sp = &ep->seq;
 527         sp->ssb_stat = 0;
 528         sp->cnt = 0;
 529         sp->id = seq_id;
 530         return sp;
 531 }
 532
 533 /**
 534  * fc_seq_start_next_locked() - Allocate a new sequence on the same
 535  *                              exchange as the supplied sequence
 536  * @sp: The sequence/exchange to get a new sequence for
 537  */
 538 static struct fc_seq *fc_seq_start_next_locked(struct fc_seq *sp)
 539 {
 540         struct fc_exch *ep = fc_seq_exch(sp);
 541
 542         sp = fc_seq_alloc(ep, ep->seq_id++);
 543         FC_EXCH_DBG(ep, "f_ctl %6x seq %2x\n",
 544                     ep->f_ctl, sp->id);
 545         return sp;
 546 }
 547
 548 /**
 549  * fc_seq_start_next() - Lock the exchange and get a new sequence
 550  *                       for a given sequence/exchange pair
 551  * @sp: The sequence/exchange to get a new exchange for
 552  */
 553 static struct fc_seq *fc_seq_start_next(struct fc_seq *sp)
 554 {
 555         struct fc_exch *ep = fc_seq_exch(sp);
 556
 557         spin_lock_bh(&ep->ex_lock);
 558         sp = fc_seq_start_next_locked(sp);
 559         spin_unlock_bh(&ep->ex_lock);
 560
 561         return sp;
 562 }
 563
 564 /*
 565  * Set the response handler for the exchange associated with a sequence.
 566  */
 567 static void fc_seq_set_resp(struct fc_seq *sp,
 568                             void (*resp)(struct fc_seq *, struct fc_frame *,
 569                                          void *),
 570                             void *arg)
 571 {
 572         struct fc_exch *ep = fc_seq_exch(sp);
 573
 574         spin_lock_bh(&ep->ex_lock);
 575         ep->resp = resp;
 576         ep->arg = arg;
 577         spin_unlock_bh(&ep->ex_lock);
 578 }
 579
 580 /**
 581  * fc_exch_abort_locked() - Abort an exchange
 582  * @ep: The exchange to be aborted
 583  * @timer_msec: The period of time to wait before aborting
 584  *
 585  * Locking notes:  Called with exch lock held
 586  *
 587  * Return value: 0 on success else error code
 588  */
 589 static int fc_exch_abort_locked(struct fc_exch *ep,
 590                                 unsigned int timer_msec)
 591 {
 592         struct fc_seq *sp;
 593         struct fc_frame *fp;
 594         int error;
 595
 596         if (ep->esb_stat & (ESB_ST_COMPLETE | ESB_ST_ABNORMAL) ||
 597             ep->state & (FC_EX_DONE | FC_EX_RST_CLEANUP))
 598                 return -ENXIO;
 599
 600         /*
 601          * Send the abort on a new sequence if possible.
 602          */
 603         sp = fc_seq_start_next_locked(&ep->seq);
 604         if (!sp)
 605                 return -ENOMEM;
 606
 607         ep->esb_stat |= ESB_ST_SEQ_INIT | ESB_ST_ABNORMAL;
 608         if (timer_msec)
 609                 fc_exch_timer_set_locked(ep, timer_msec);
 610
 611         /*
 612          * If not logged into the fabric, don't send ABTS but leave
 613          * sequence active until next timeout.
 614          */
 615         if (!ep->sid)
 616                 return 0;
 617
 618         /*
 619          * Send an abort for the sequence that timed out.
 620          */
 621         fp = fc_frame_alloc(ep->lp, 0);
 622         if (fp) {
 623                 fc_fill_fc_hdr(fp, FC_RCTL_BA_ABTS, ep->did, ep->sid,
 624                                FC_TYPE_BLS, FC_FC_END_SEQ | FC_FC_SEQ_INIT, 0);
 625                 error = fc_seq_send(ep->lp, sp, fp);
 626         } else
 627                 error = -ENOBUFS;
 628         return error;
 629 }
 630
 631 /**
 632  * fc_seq_exch_abort() - Abort an exchange and sequence
 633  * @req_sp:     The sequence to be aborted
 634  * @timer_msec: The period of time to wait before aborting
 635  *
 636  * Generally called because of a timeout or an abort from the upper layer.
 637  *
 638  * Return value: 0 on success else error code
 639  */
 640 static int fc_seq_exch_abort(const struct fc_seq *req_sp,
 641                              unsigned int timer_msec)
 642 {
 643         struct fc_exch *ep;
 644         int error;
 645
 646         ep = fc_seq_exch(req_sp);
 647         spin_lock_bh(&ep->ex_lock);
 648         error = fc_exch_abort_locked(ep, timer_msec);
 649         spin_unlock_bh(&ep->ex_lock);
 650         return error;
 651 }
 652
 653 /**
 654  * fc_exch_timeout() - Handle exchange timer expiration
 655  * @work: The work_struct identifying the exchange that timed out
 656  */
 657 static void fc_exch_timeout(struct work_struct *work)
 658 {
 659         struct fc_exch *ep = container_of(work, struct fc_exch,
 660                                           timeout_work.work);
 661         struct fc_seq *sp = &ep->seq;
 662         void (*resp)(struct fc_seq *, struct fc_frame *fp, void *arg);
 663         void *arg;
 664         u32 e_stat;
 665         int rc = 1;
 666
 667         FC_EXCH_DBG(ep, "Exchange timed out\n");
 668
 669         spin_lock_bh(&ep->ex_lock);
 670         if (ep->state & (FC_EX_RST_CLEANUP | FC_EX_DONE))
 671                 goto unlock;
 672
 673         e_stat = ep->esb_stat;
 674         if (e_stat & ESB_ST_COMPLETE) {
 675                 ep->esb_stat = e_stat & ~ESB_ST_REC_QUAL;
 676                 spin_unlock_bh(&ep->ex_lock);
 677                 if (e_stat & ESB_ST_REC_QUAL)
 678                         fc_exch_rrq(ep);
 679                 goto done;
 680         } else {
 681                 resp = ep->resp;
 682                 arg = ep->arg;
 683                 ep->resp = NULL;
 684                 if (e_stat & ESB_ST_ABNORMAL)
 685                         rc = fc_exch_done_locked(ep);
 686                 spin_unlock_bh(&ep->ex_lock);
 687                 if (!rc)
 688                         fc_exch_delete(ep);
 689                 if (resp)
 690                         resp(sp, ERR_PTR(-FC_EX_TIMEOUT), arg);
 691                 fc_seq_exch_abort(sp, 2 * ep->r_a_tov);
 692                 goto done;
 693         }
 694 unlock:
 695         spin_unlock_bh(&ep->ex_lock);
 696 done:
 697         /*
 698          * This release matches the hold taken when the timer was set.
 699          */
 700         fc_exch_release(ep);
 701 }
 702
 703 /**
 704  * fc_exch_em_alloc() - Allocate an exchange from a specified EM.
 705  * @lport: The local port that the exchange is for
 706  * @mp:    The exchange manager that will allocate the exchange
 707  *
 708  * Returns pointer to allocated fc_exch with exch lock held.
 709  */
 710 static struct fc_exch *fc_exch_em_alloc(struct fc_lport *lport,
 711                                         struct fc_exch_mgr *mp)
 712 {
 713         struct fc_exch *ep;
 714         unsigned int cpu;
 715         u16 index;
 716         struct fc_exch_pool *pool;
 717
 718         /* allocate memory for exchange */
 719         ep = mempool_alloc(mp->ep_pool, GFP_ATOMIC);
 720         if (!ep) {
 721                 atomic_inc(&mp->stats.no_free_exch);
 722                 goto out;
 723         }
 724         memset(ep, 0, sizeof(*ep));
 725
 726         cpu = get_cpu();
 727         pool = per_cpu_ptr(mp->pool, cpu);
 728         spin_lock_bh(&pool->lock);
 729         put_cpu();
 730
 731         /* peek cache of free slot */
 732         if (pool->left != FC_XID_UNKNOWN) {
 733                 index = pool->left;
 734                 pool->left = FC_XID_UNKNOWN;
 735                 goto hit;
 736         }
 737         if (pool->right != FC_XID_UNKNOWN) {
 738                 index = pool->right;
 739                 pool->right = FC_XID_UNKNOWN;
 740                 goto hit;
 741         }
 742
 743         index = pool->next_index;
 744         /* allocate new exch from pool */
 745         while (fc_exch_ptr_get(pool, index)) {
 746                 index = index == mp->pool_max_index ? 0 : index + 1;
 747                 if (index == pool->next_index)
 748                         goto err;
 749         }
 750         pool->next_index = index == mp->pool_max_index ? 0 : index + 1;
 751 hit:
 752         fc_exch_hold(ep);       /* hold for exch in mp */
 753         spin_lock_init(&ep->ex_lock);
 754         /*
 755          * Hold exch lock for caller to prevent fc_exch_reset()
 756          * from releasing exch  while fc_exch_alloc() caller is
 757          * still working on exch.
 758          */
 759         spin_lock_bh(&ep->ex_lock);
 760
 761         fc_exch_ptr_set(pool, index, ep);
 762         list_add_tail(&ep->ex_list, &pool->ex_list);
 763         fc_seq_alloc(ep, ep->seq_id++);
 764         pool->total_exches++;
 765         spin_unlock_bh(&pool->lock);
 766
 767         /*
 768          *  update exchange
 769          */
 770         ep->oxid = ep->xid = (index << fc_cpu_order | cpu) + mp->min_xid;
 771         ep->em = mp;
 772         ep->pool = pool;
 773         ep->lp = lport;
 774         ep->f_ctl = FC_FC_FIRST_SEQ;    /* next seq is first seq */
 775         ep->rxid = FC_XID_UNKNOWN;
 776         ep->class = mp->class;
 777         INIT_DELAYED_WORK(&ep->timeout_work, fc_exch_timeout);
 778 out:
 779         return ep;
 780 err:
 781         spin_unlock_bh(&pool->lock);
 782         atomic_inc(&mp->stats.no_free_exch_xid);
 783         mempool_free(ep, mp->ep_pool);
 784         return NULL;
 785 }
 786
 787 /**
 788  * fc_exch_alloc() - Allocate an exchange from an EM on a
 789  *                   local port's list of EMs.
 790  * @lport: The local port that will own the exchange
 791  * @fp:    The FC frame that the exchange will be for
 792  *
 793  * This function walks the list of exchange manager(EM)
 794  * anchors to select an EM for a new exchange allocation. The
 795  * EM is selected when a NULL match function pointer is encountered
 796  * or when a call to a match function returns true.
 797  */
 798 static inline struct fc_exch *fc_exch_alloc(struct fc_lport *lport,
 799                                             struct fc_frame *fp)
 800 {
 801         struct fc_exch_mgr_anchor *ema;
 802
 803         list_for_each_entry(ema, &lport->ema_list, ema_list)
 804                 if (!ema->match || ema->match(fp))
 805                         return fc_exch_em_alloc(lport, ema->mp);
 806         return NULL;
 807 }
 808
 809 /**
 810  * fc_exch_find() - Lookup and hold an exchange
 811  * @mp:  The exchange manager to lookup the exchange from
 812  * @xid: The XID of the exchange to look up
 813  */
 814 static struct fc_exch *fc_exch_find(struct fc_exch_mgr *mp, u16 xid)
 815 {
 816         struct fc_exch_pool *pool;
 817         struct fc_exch *ep = NULL;
 818
 819         if ((xid >= mp->min_xid) && (xid <= mp->max_xid)) {
 820                 pool = per_cpu_ptr(mp->pool, xid & fc_cpu_mask);
 821                 spin_lock_bh(&pool->lock);
 822                 ep = fc_exch_ptr_get(pool, (xid - mp->min_xid) >> fc_cpu_order);
 823                 if (ep && ep->xid == xid)
 824                         fc_exch_hold(ep);
 825                 spin_unlock_bh(&pool->lock);
 826         }
 827         return ep;
 828 }
 829
 830
 831 /**
 832  * fc_exch_done() - Indicate that an exchange/sequence tuple is complete and
 833  *                  the memory allocated for the related objects may be freed.
 834  * @sp: The sequence that has completed
 835  */
 836 static void fc_exch_done(struct fc_seq *sp)
 837 {
 838         struct fc_exch *ep = fc_seq_exch(sp);
 839         int rc;
 840
 841         spin_lock_bh(&ep->ex_lock);
 842         rc = fc_exch_done_locked(ep);
 843         spin_unlock_bh(&ep->ex_lock);
 844         if (!rc)
 845                 fc_exch_delete(ep);
 846 }
 847
 848 /**
 849  * fc_exch_resp() - Allocate a new exchange for a response frame
 850  * @lport: The local port that the exchange was for
 851  * @mp:    The exchange manager to allocate the exchange from
 852  * @fp:    The response frame
 853  *
 854  * Sets the responder ID in the frame header.
 855  */
 856 static struct fc_exch *fc_exch_resp(struct fc_lport *lport,
 857                                     struct fc_exch_mgr *mp,
 858                                     struct fc_frame *fp)
 859 {
 860         struct fc_exch *ep;
 861         struct fc_frame_header *fh;
 862
 863         ep = fc_exch_alloc(lport, fp);
 864         if (ep) {
 865                 ep->class = fc_frame_class(fp);
 866
 867                 /*
 868                  * Set EX_CTX indicating we're responding on this exchange.
 869                  */
 870                 ep->f_ctl |= FC_FC_EX_CTX;      /* we're responding */
 871                 ep->f_ctl &= ~FC_FC_FIRST_SEQ;  /* not new */
 872                 fh = fc_frame_header_get(fp);
 873                 ep->sid = ntoh24(fh->fh_d_id);
 874                 ep->did = ntoh24(fh->fh_s_id);
 875                 ep->oid = ep->did;
 876
 877                 /*
 878                  * Allocated exchange has placed the XID in the
 879                  * originator field. Move it to the responder field,
 880                  * and set the originator XID from the frame.
 881                  */
 882                 ep->rxid = ep->xid;
 883                 ep->oxid = ntohs(fh->fh_ox_id);
 884                 ep->esb_stat |= ESB_ST_RESP | ESB_ST_SEQ_INIT;
 885                 if ((ntoh24(fh->fh_f_ctl) & FC_FC_SEQ_INIT) == 0)
 886                         ep->esb_stat &= ~ESB_ST_SEQ_INIT;
 887
 888                 fc_exch_hold(ep);       /* hold for caller */
 889                 spin_unlock_bh(&ep->ex_lock);   /* lock from fc_exch_alloc */
 890         }
 891         return ep;
 892 }
 893
 894 /**
 895  * fc_seq_lookup_recip() - Find a sequence where the other end
 896  *                         originated the sequence
 897  * @lport: The local port that the frame was sent to
 898  * @mp:    The Exchange Manager to lookup the exchange from
 899  * @fp:    The frame associated with the sequence we're looking for
 900  *
 901  * If fc_pf_rjt_reason is FC_RJT_NONE then this function will have a hold
 902  * on the ep that should be released by the caller.
 903  */
 904 static enum fc_pf_rjt_reason fc_seq_lookup_recip(struct fc_lport *lport,
 905                                                  struct fc_exch_mgr *mp,
 906                                                  struct fc_frame *fp)
 907 {
 908         struct fc_frame_header *fh = fc_frame_header_get(fp);
 909         struct fc_exch *ep = NULL;
 910         struct fc_seq *sp = NULL;
 911         enum fc_pf_rjt_reason reject = FC_RJT_NONE;
 912         u32 f_ctl;
 913         u16 xid;
 914
 915         f_ctl = ntoh24(fh->fh_f_ctl);
 916         WARN_ON((f_ctl & FC_FC_SEQ_CTX) != 0);
 917
 918         /*
 919          * Lookup or create the exchange if we will be creating the sequence.
 920          */
 921         if (f_ctl & FC_FC_EX_CTX) {
 922                 xid = ntohs(fh->fh_ox_id);      /* we originated exch */
 923                 ep = fc_exch_find(mp, xid);
 924                 if (!ep) {
 925                         atomic_inc(&mp->stats.xid_not_found);
 926                         reject = FC_RJT_OX_ID;
 927                         goto out;
 928                 }
 929                 if (ep->rxid == FC_XID_UNKNOWN)
 930                         ep->rxid = ntohs(fh->fh_rx_id);
 931                 else if (ep->rxid != ntohs(fh->fh_rx_id)) {
 932                         reject = FC_RJT_OX_ID;
 933                         goto rel;
 934                 }
 935         } else {
 936                 xid = ntohs(fh->fh_rx_id);      /* we are the responder */
 937
 938                 /*
 939                  * Special case for MDS issuing an ELS TEST with a
 940                  * bad rxid of 0.
 941                  * XXX take this out once we do the proper reject.
 942                  */
 943                 if (xid == 0 && fh->fh_r_ctl == FC_RCTL_ELS_REQ &&
 944                     fc_frame_payload_op(fp) == ELS_TEST) {
 945                         fh->fh_rx_id = htons(FC_XID_UNKNOWN);
 946                         xid = FC_XID_UNKNOWN;
 947                 }
 948
 949                 /*
 950                  * new sequence - find the exchange
 951                  */
 952                 ep = fc_exch_find(mp, xid);
 953                 if ((f_ctl & FC_FC_FIRST_SEQ) && fc_sof_is_init(fr_sof(fp))) {
 954                         if (ep) {
 955                                 atomic_inc(&mp->stats.xid_busy);
 956                                 reject = FC_RJT_RX_ID;
 957                                 goto rel;
 958                         }
 959                         ep = fc_exch_resp(lport, mp, fp);
 960                         if (!ep) {
 961                                 reject = FC_RJT_EXCH_EST;       /* XXX */
 962                                 goto out;
 963                         }
 964                         xid = ep->xid;  /* get our XID */
 965                 } else if (!ep) {
 966                         atomic_inc(&mp->stats.xid_not_found);
 967                         reject = FC_RJT_RX_ID;  /* XID not found */
 968                         goto out;
 969                 }
 970         }
 971
 972         /*
 973          * At this point, we have the exchange held.
 974          * Find or create the sequence.
 975          */
 976         if (fc_sof_is_init(fr_sof(fp))) {
 977                 sp = &ep->seq;
 978                 sp->ssb_stat |= SSB_ST_RESP;
 979                 sp->id = fh->fh_seq_id;
 980         } else {
 981                 sp = &ep->seq;
 982                 if (sp->id != fh->fh_seq_id) {
 983                         atomic_inc(&mp->stats.seq_not_found);
 984                         if (f_ctl & FC_FC_END_SEQ) {
 985                                 /*
 986                                  * Update sequence_id based on incoming last
 987                                  * frame of sequence exchange. This is needed
 988                                  * for FCoE target where DDP has been used
 989                                  * on target where, stack is indicated only
 990                                  * about last frame's (payload _header) header.
 991                                  * Whereas "seq_id" which is part of
 992                                  * frame_header is allocated by initiator
 993                                  * which is totally different from "seq_id"
 994                                  * allocated when XFER_RDY was sent by target.
 995                                  * To avoid false -ve which results into not
 996                                  * sending RSP, hence write request on other
 997                                  * end never finishes.
 998                                  */
 999                                 spin_lock_bh(&ep->ex_lock);
1000                                 sp->ssb_stat |= SSB_ST_RESP;
1001                                 sp->id = fh->fh_seq_id;
1002                                 spin_unlock_bh(&ep->ex_lock);
1003                         } else {
1004                                 /* sequence/exch should exist */
1005                                 reject = FC_RJT_SEQ_ID;
1006                                 goto rel;
1007                         }
1008                 }
1009         }
1010         WARN_ON(ep != fc_seq_exch(sp));
1011
1012         if (f_ctl & FC_FC_SEQ_INIT)
1013                 ep->esb_stat |= ESB_ST_SEQ_INIT;
1014
1015         fr_seq(fp) = sp;
1016 out:
1017         return reject;
1018 rel:
1019         fc_exch_done(&ep->seq);
1020         fc_exch_release(ep);    /* hold from fc_exch_find/fc_exch_resp */
1021         return reject;
1022 }
1023
1024 /**
1025  * fc_seq_lookup_orig() - Find a sequence where this end
1026  *                        originated the sequence
1027  * @mp:    The Exchange Manager to lookup the exchange from
1028  * @fp:    The frame associated with the sequence we're looking for
1029  *
1030  * Does not hold the sequence for the caller.
1031  */
1032 static struct fc_seq *fc_seq_lookup_orig(struct fc_exch_mgr *mp,
1033                                          struct fc_frame *fp)
1034 {
1035         struct fc_frame_header *fh = fc_frame_header_get(fp);
1036         struct fc_exch *ep;
1037         struct fc_seq *sp = NULL;
1038         u32 f_ctl;
1039         u16 xid;
1040
1041         f_ctl = ntoh24(fh->fh_f_ctl);
1042         WARN_ON((f_ctl & FC_FC_SEQ_CTX) != FC_FC_SEQ_CTX);
1043         xid = ntohs((f_ctl & FC_FC_EX_CTX) ? fh->fh_ox_id : fh->fh_rx_id);
1044         ep = fc_exch_find(mp, xid);
1045         if (!ep)
1046                 return NULL;
1047         if (ep->seq.id == fh->fh_seq_id) {
1048                 /*
1049                  * Save the RX_ID if we didn't previously know it.
1050                  */
1051                 sp = &ep->seq;
1052                 if ((f_ctl & FC_FC_EX_CTX) != 0 &&
1053                     ep->rxid == FC_XID_UNKNOWN) {
1054                         ep->rxid = ntohs(fh->fh_rx_id);
1055                 }
1056         }
1057         fc_exch_release(ep);
1058         return sp;
1059 }
1060
1061 /**
1062  * fc_exch_set_addr() - Set the source and destination IDs for an exchange
1063  * @ep:      The exchange to set the addresses for
1064  * @orig_id: The originator's ID
1065  * @resp_id: The responder's ID
1066  *
1067  * Note this must be done before the first sequence of the exchange is sent.
1068  */
1069 static void fc_exch_set_addr(struct fc_exch *ep,
1070                              u32 orig_id, u32 resp_id)
1071 {
1072         ep->oid = orig_id;
1073         if (ep->esb_stat & ESB_ST_RESP) {
1074                 ep->sid = resp_id;
1075                 ep->did = orig_id;
1076         } else {
1077                 ep->sid = orig_id;
1078                 ep->did = resp_id;
1079         }
1080 }
1081
1082 /**
1083  * fc_seq_els_rsp_send() - Send an ELS response using information from
1084  *                         the existing sequence/exchange.
1085  * @fp:       The received frame
1086  * @els_cmd:  The ELS command to be sent
1087  * @els_data: The ELS data to be sent
1088  *
1089  * The received frame is not freed.
1090  */
1091 static void fc_seq_els_rsp_send(struct fc_frame *fp, enum fc_els_cmd els_cmd,
1092                                 struct fc_seq_els_data *els_data)
1093 {
1094         switch (els_cmd) {
1095         case ELS_LS_RJT:
1096                 fc_seq_ls_rjt(fp, els_data->reason, els_data->explan);
1097                 break;
1098         case ELS_LS_ACC:
1099                 fc_seq_ls_acc(fp);
1100                 break;
1101         case ELS_RRQ:
1102                 fc_exch_els_rrq(fp);
1103                 break;
1104         case ELS_REC:
1105                 fc_exch_els_rec(fp);
1106                 break;
1107         default:
1108                 FC_LPORT_DBG(fr_dev(fp), "Invalid ELS CMD:%x\n", els_cmd);
1109         }
1110 }
1111
1112 /**
1113  * fc_seq_send_last() - Send a sequence that is the last in the exchange
1114  * @sp:      The sequence that is to be sent
1115  * @fp:      The frame that will be sent on the sequence
1116  * @rctl:    The R_CTL information to be sent
1117  * @fh_type: The frame header type
1118  */
1119 static void fc_seq_send_last(struct fc_seq *sp, struct fc_frame *fp,
1120                              enum fc_rctl rctl, enum fc_fh_type fh_type)
1121 {
1122         u32 f_ctl;
1123         struct fc_exch *ep = fc_seq_exch(sp);
1124
1125         f_ctl = FC_FC_LAST_SEQ | FC_FC_END_SEQ | FC_FC_SEQ_INIT;
1126         f_ctl |= ep->f_ctl;
1127         fc_fill_fc_hdr(fp, rctl, ep->did, ep->sid, fh_type, f_ctl, 0);
1128         fc_seq_send(ep->lp, sp, fp);
1129 }
1130
1131 /**
1132  * fc_seq_send_ack() - Send an acknowledgement that we've received a frame
1133  * @sp:    The sequence to send the ACK on
1134  * @rx_fp: The received frame that is being acknoledged
1135  *
1136  * Send ACK_1 (or equiv.) indicating we received something.
1137  */
1138 static void fc_seq_send_ack(struct fc_seq *sp, const struct fc_frame *rx_fp)
1139 {
1140         struct fc_frame *fp;
1141         struct fc_frame_header *rx_fh;
1142         struct fc_frame_header *fh;
1143         struct fc_exch *ep = fc_seq_exch(sp);
1144         struct fc_lport *lport = ep->lp;
1145         unsigned int f_ctl;
1146
1147         /*
1148          * Don't send ACKs for class 3.
1149          */
1150         if (fc_sof_needs_ack(fr_sof(rx_fp))) {
1151                 fp = fc_frame_alloc(lport, 0);
1152                 if (!fp)
1153                         return;
1154
1155                 fh = fc_frame_header_get(fp);
1156                 fh->fh_r_ctl = FC_RCTL_ACK_1;
1157                 fh->fh_type = FC_TYPE_BLS;
1158
1159                 /*
1160                  * Form f_ctl by inverting EX_CTX and SEQ_CTX (bits 23, 22).
1161                  * Echo FIRST_SEQ, LAST_SEQ, END_SEQ, END_CONN, SEQ_INIT.
1162                  * Bits 9-8 are meaningful (retransmitted or unidirectional).
1163                  * Last ACK uses bits 7-6 (continue sequence),
1164                  * bits 5-4 are meaningful (what kind of ACK to use).
1165                  */
1166                 rx_fh = fc_frame_header_get(rx_fp);
1167                 f_ctl = ntoh24(rx_fh->fh_f_ctl);
1168                 f_ctl &= FC_FC_EX_CTX | FC_FC_SEQ_CTX |
1169                         FC_FC_FIRST_SEQ | FC_FC_LAST_SEQ |
1170                         FC_FC_END_SEQ | FC_FC_END_CONN | FC_FC_SEQ_INIT |
1171                         FC_FC_RETX_SEQ | FC_FC_UNI_TX;
1172                 f_ctl ^= FC_FC_EX_CTX | FC_FC_SEQ_CTX;
1173                 hton24(fh->fh_f_ctl, f_ctl);
1174
1175                 fc_exch_setup_hdr(ep, fp, f_ctl);
1176                 fh->fh_seq_id = rx_fh->fh_seq_id;
1177                 fh->fh_seq_cnt = rx_fh->fh_seq_cnt;
1178                 fh->fh_parm_offset = htonl(1);  /* ack single frame */
1179
1180                 fr_sof(fp) = fr_sof(rx_fp);
1181                 if (f_ctl & FC_FC_END_SEQ)
1182                         fr_eof(fp) = FC_EOF_T;
1183                 else
1184                         fr_eof(fp) = FC_EOF_N;
1185
1186                 lport->tt.frame_send(lport, fp);
1187         }
1188 }
1189
1190 /**
1191  * fc_exch_send_ba_rjt() - Send BLS Reject
1192  * @rx_fp:  The frame being rejected
1193  * @reason: The reason the frame is being rejected
1194  * @explan: The explanation for the rejection
1195  *
1196  * This is for rejecting BA_ABTS only.
1197  */
1198 static void fc_exch_send_ba_rjt(struct fc_frame *rx_fp,
1199                                 enum fc_ba_rjt_reason reason,
1200                                 enum fc_ba_rjt_explan explan)
1201 {
1202         struct fc_frame *fp;
1203         struct fc_frame_header *rx_fh;
1204         struct fc_frame_header *fh;
1205         struct fc_ba_rjt *rp;
1206         struct fc_lport *lport;
1207         unsigned int f_ctl;
1208
1209         lport = fr_dev(rx_fp);
1210         fp = fc_frame_alloc(lport, sizeof(*rp));
1211         if (!fp)
1212                 return;
1213         fh = fc_frame_header_get(fp);
1214         rx_fh = fc_frame_header_get(rx_fp);
1215
1216         memset(fh, 0, sizeof(*fh) + sizeof(*rp));
1217
1218         rp = fc_frame_payload_get(fp, sizeof(*rp));
1219         rp->br_reason = reason;
1220         rp->br_explan = explan;
1221
1222         /*
1223          * seq_id, cs_ctl, df_ctl and param/offset are zero.
1224          */
1225         memcpy(fh->fh_s_id, rx_fh->fh_d_id, 3);
1226         memcpy(fh->fh_d_id, rx_fh->fh_s_id, 3);
1227         fh->fh_ox_id = rx_fh->fh_ox_id;
1228         fh->fh_rx_id = rx_fh->fh_rx_id;
1229         fh->fh_seq_cnt = rx_fh->fh_seq_cnt;
1230         fh->fh_r_ctl = FC_RCTL_BA_RJT;
1231         fh->fh_type = FC_TYPE_BLS;
1232
1233         /*
1234          * Form f_ctl by inverting EX_CTX and SEQ_CTX (bits 23, 22).
1235          * Echo FIRST_SEQ, LAST_SEQ, END_SEQ, END_CONN, SEQ_INIT.
1236          * Bits 9-8 are meaningful (retransmitted or unidirectional).
1237          * Last ACK uses bits 7-6 (continue sequence),
1238          * bits 5-4 are meaningful (what kind of ACK to use).
1239          * Always set LAST_SEQ, END_SEQ.
1240          */
1241         f_ctl = ntoh24(rx_fh->fh_f_ctl);
1242         f_ctl &= FC_FC_EX_CTX | FC_FC_SEQ_CTX |
1243                 FC_FC_END_CONN | FC_FC_SEQ_INIT |
1244                 FC_FC_RETX_SEQ | FC_FC_UNI_TX;
1245         f_ctl ^= FC_FC_EX_CTX | FC_FC_SEQ_CTX;
1246         f_ctl |= FC_FC_LAST_SEQ | FC_FC_END_SEQ;
1247         f_ctl &= ~FC_FC_FIRST_SEQ;
1248         hton24(fh->fh_f_ctl, f_ctl);
1249
1250         fr_sof(fp) = fc_sof_class(fr_sof(rx_fp));
1251         fr_eof(fp) = FC_EOF_T;
1252         if (fc_sof_needs_ack(fr_sof(fp)))
1253                 fr_eof(fp) = FC_EOF_N;
1254
1255         lport->tt.frame_send(lport, fp);
1256 }
1257
1258 /**
1259  * fc_exch_recv_abts() - Handle an incoming ABTS
1260  * @ep:    The exchange the abort was on
1261  * @rx_fp: The ABTS frame
1262  *
1263  * This would be for target mode usually, but could be due to lost
1264  * FCP transfer ready, confirm or RRQ. We always handle this as an
1265  * exchange abort, ignoring the parameter.
1266  */
1267 static void fc_exch_recv_abts(struct fc_exch *ep, struct fc_frame *rx_fp)
1268 {
1269         struct fc_frame *fp;
1270         struct fc_ba_acc *ap;
1271         struct fc_frame_header *fh;
1272         struct fc_seq *sp;
1273
1274         if (!ep)
1275                 goto reject;
1276         spin_lock_bh(&ep->ex_lock);
1277         if (ep->esb_stat & ESB_ST_COMPLETE) {
1278                 spin_unlock_bh(&ep->ex_lock);
1279                 goto reject;
1280         }
1281         if (!(ep->esb_stat & ESB_ST_REC_QUAL))
1282                 fc_exch_hold(ep);               /* hold for REC_QUAL */
1283         ep->esb_stat |= ESB_ST_ABNORMAL | ESB_ST_REC_QUAL;
1284         fc_exch_timer_set_locked(ep, ep->r_a_tov);
1285
1286         fp = fc_frame_alloc(ep->lp, sizeof(*ap));
1287         if (!fp) {
1288                 spin_unlock_bh(&ep->ex_lock);
1289                 goto free;
1290         }
1291         fh = fc_frame_header_get(fp);
1292         ap = fc_frame_payload_get(fp, sizeof(*ap));
1293         memset(ap, 0, sizeof(*ap));
1294         sp = &ep->seq;
1295         ap->ba_high_seq_cnt = htons(0xffff);
1296         if (sp->ssb_stat & SSB_ST_RESP) {
1297                 ap->ba_seq_id = sp->id;
1298                 ap->ba_seq_id_val = FC_BA_SEQ_ID_VAL;
1299                 ap->ba_high_seq_cnt = fh->fh_seq_cnt;
1300                 ap->ba_low_seq_cnt = htons(sp->cnt);
1301         }
1302         sp = fc_seq_start_next_locked(sp);
1303         spin_unlock_bh(&ep->ex_lock);
1304         fc_seq_send_last(sp, fp, FC_RCTL_BA_ACC, FC_TYPE_BLS);
1305         fc_frame_free(rx_fp);
1306         return;
1307
1308 reject:
1309         fc_exch_send_ba_rjt(rx_fp, FC_BA_RJT_UNABLE, FC_BA_RJT_INV_XID);
1310 free:
1311         fc_frame_free(rx_fp);
1312 }
1313
1314 /**
1315  * fc_seq_assign() - Assign exchange and sequence for incoming request
1316  * @lport: The local port that received the request
1317  * @fp:    The request frame
1318  *
1319  * On success, the sequence pointer will be returned and also in fr_seq(@fp).
1320  * A reference will be held on the exchange/sequence for the caller, which
1321  * must call fc_seq_release().
1322  */
1323 static struct fc_seq *fc_seq_assign(struct fc_lport *lport, struct fc_frame *fp)
1324 {
1325         struct fc_exch_mgr_anchor *ema;
1326
1327         WARN_ON(lport != fr_dev(fp));
1328         WARN_ON(fr_seq(fp));
1329         fr_seq(fp) = NULL;
1330
1331         list_for_each_entry(ema, &lport->ema_list, ema_list)
1332                 if ((!ema->match || ema->match(fp)) &&
1333                     fc_seq_lookup_recip(lport, ema->mp, fp) == FC_RJT_NONE)
1334                         break;
1335         return fr_seq(fp);
1336 }
1337
1338 /**
1339  * fc_seq_release() - Release the hold
1340  * @sp:    The sequence.
1341  */
1342 static void fc_seq_release(struct fc_seq *sp)
1343 {
1344         fc_exch_release(fc_seq_exch(sp));
1345 }
1346
1347 /**
1348  * fc_exch_recv_req() - Handler for an incoming request
1349  * @lport: The local port that received the request
1350  * @mp:    The EM that the exchange is on
1351  * @fp:    The request frame
1352  *
1353  * This is used when the other end is originating the exchange
1354  * and the sequence.
1355  */
1356 static void fc_exch_recv_req(struct fc_lport *lport, struct fc_exch_mgr *mp,
1357                              struct fc_frame *fp)
1358 {
1359         struct fc_frame_header *fh = fc_frame_header_get(fp);
1360         struct fc_seq *sp = NULL;
1361         struct fc_exch *ep = NULL;
1362         enum fc_pf_rjt_reason reject;
1363
1364         /* We can have the wrong fc_lport at this point with NPIV, which is a
1365          * problem now that we know a new exchange needs to be allocated
1366          */
1367         lport = fc_vport_id_lookup(lport, ntoh24(fh->fh_d_id));
1368         if (!lport) {
1369                 fc_frame_free(fp);
1370                 return;
1371         }
1372         fr_dev(fp) = lport;
1373
1374         BUG_ON(fr_seq(fp));             /* XXX remove later */
1375
1376         /*
1377          * If the RX_ID is 0xffff, don't allocate an exchange.
1378          * The upper-level protocol may request one later, if needed.
1379          */
1380         if (fh->fh_rx_id == htons(FC_XID_UNKNOWN))
1381                 return lport->tt.lport_recv(lport, fp);
1382
1383         reject = fc_seq_lookup_recip(lport, mp, fp);
1384         if (reject == FC_RJT_NONE) {
1385                 sp = fr_seq(fp);        /* sequence will be held */
1386                 ep = fc_seq_exch(sp);
1387                 fc_seq_send_ack(sp, fp);
1388                 ep->encaps = fr_encaps(fp);
1389
1390                 /*
1391                  * Call the receive function.
1392                  *
1393                  * The receive function may allocate a new sequence
1394                  * over the old one, so we shouldn't change the
1395                  * sequence after this.
1396                  *
1397                  * The frame will be freed by the receive function.
1398                  * If new exch resp handler is valid then call that
1399                  * first.
1400                  */
1401                 if (ep->resp)
1402                         ep->resp(sp, fp, ep->arg);
1403                 else
1404                         lport->tt.lport_recv(lport, fp);
1405                 fc_exch_release(ep);    /* release from lookup */
1406         } else {
1407                 FC_LPORT_DBG(lport, "exch/seq lookup failed: reject %x\n",
1408                              reject);
1409                 fc_frame_free(fp);
1410         }
1411 }
1412
1413 /**
1414  * fc_exch_recv_seq_resp() - Handler for an incoming response where the other
1415  *                           end is the originator of the sequence that is a
1416  *                           response to our initial exchange
1417  * @mp: The EM that the exchange is on
1418  * @fp: The response frame
1419  */
1420 static void fc_exch_recv_seq_resp(struct fc_exch_mgr *mp, struct fc_frame *fp)
1421 {
1422         struct fc_frame_header *fh = fc_frame_header_get(fp);
1423         struct fc_seq *sp;
1424         struct fc_exch *ep;
1425         enum fc_sof sof;
1426         u32 f_ctl;
1427         void (*resp)(struct fc_seq *, struct fc_frame *fp, void *arg);
1428         void *ex_resp_arg;
1429         int rc;
1430
1431         ep = fc_exch_find(mp, ntohs(fh->fh_ox_id));
1432         if (!ep) {
1433                 atomic_inc(&mp->stats.xid_not_found);
1434                 goto out;
1435         }
1436         if (ep->esb_stat & ESB_ST_COMPLETE) {
1437                 atomic_inc(&mp->stats.xid_not_found);
1438                 goto rel;
1439         }
1440         if (ep->rxid == FC_XID_UNKNOWN)
1441                 ep->rxid = ntohs(fh->fh_rx_id);
1442         if (ep->sid != 0 && ep->sid != ntoh24(fh->fh_d_id)) {
1443                 atomic_inc(&mp->stats.xid_not_found);
1444                 goto rel;
1445         }
1446         if (ep->did != ntoh24(fh->fh_s_id) &&
1447             ep->did != FC_FID_FLOGI) {
1448                 atomic_inc(&mp->stats.xid_not_found);
1449                 goto rel;
1450         }
1451         sof = fr_sof(fp);
1452         sp = &ep->seq;
1453         if (fc_sof_is_init(sof)) {
1454                 sp->ssb_stat |= SSB_ST_RESP;
1455                 sp->id = fh->fh_seq_id;
1456         } else if (sp->id != fh->fh_seq_id) {
1457                 atomic_inc(&mp->stats.seq_not_found);
1458                 goto rel;
1459         }
1460
1461         f_ctl = ntoh24(fh->fh_f_ctl);
1462         fr_seq(fp) = sp;
1463         if (f_ctl & FC_FC_SEQ_INIT)
1464                 ep->esb_stat |= ESB_ST_SEQ_INIT;
1465
1466         if (fc_sof_needs_ack(sof))
1467                 fc_seq_send_ack(sp, fp);
1468         resp = ep->resp;
1469         ex_resp_arg = ep->arg;
1470
1471         if (fh->fh_type != FC_TYPE_FCP && fr_eof(fp) == FC_EOF_T &&
1472             (f_ctl & (FC_FC_LAST_SEQ | FC_FC_END_SEQ)) ==
1473             (FC_FC_LAST_SEQ | FC_FC_END_SEQ)) {
1474                 spin_lock_bh(&ep->ex_lock);
1475                 resp = ep->resp;
1476                 rc = fc_exch_done_locked(ep);
1477                 WARN_ON(fc_seq_exch(sp) != ep);
1478                 spin_unlock_bh(&ep->ex_lock);
1479                 if (!rc)
1480                         fc_exch_delete(ep);
1481         }
1482
1483         /*
1484          * Call the receive function.
1485          * The sequence is held (has a refcnt) for us,
1486          * but not for the receive function.
1487          *
1488          * The receive function may allocate a new sequence
1489          * over the old one, so we shouldn't change the
1490          * sequence after this.
1491          *
1492          * The frame will be freed by the receive function.
1493          * If new exch resp handler is valid then call that
1494          * first.
1495          */
1496         if (resp)
1497                 resp(sp, fp, ex_resp_arg);
1498         else
1499                 fc_frame_free(fp);
1500         fc_exch_release(ep);
1501         return;
1502 rel:
1503         fc_exch_release(ep);
1504 out:
1505         fc_frame_free(fp);
1506 }
1507
1508 /**
1509  * fc_exch_recv_resp() - Handler for a sequence where other end is
1510  *                       responding to our sequence
1511  * @mp: The EM that the exchange is on
1512  * @fp: The response frame
1513  */
1514 static void fc_exch_recv_resp(struct fc_exch_mgr *mp, struct fc_frame *fp)
1515 {
1516         struct fc_seq *sp;
1517
1518         sp = fc_seq_lookup_orig(mp, fp);        /* doesn't hold sequence */
1519
1520         if (!sp)
1521                 atomic_inc(&mp->stats.xid_not_found);
1522         else
1523                 atomic_inc(&mp->stats.non_bls_resp);
1524
1525         fc_frame_free(fp);
1526 }
1527
1528 /**
1529  * fc_exch_abts_resp() - Handler for a response to an ABT
1530  * @ep: The exchange that the frame is on
1531  * @fp: The response frame
1532  *
1533  * This response would be to an ABTS cancelling an exchange or sequence.
1534  * The response can be either BA_ACC or BA_RJT
1535  */
1536 static void fc_exch_abts_resp(struct fc_exch *ep, struct fc_frame *fp)
1537 {
1538         void (*resp)(struct fc_seq *, struct fc_frame *fp, void *arg);
1539         void *ex_resp_arg;
1540         struct fc_frame_header *fh;
1541         struct fc_ba_acc *ap;
1542         struct fc_seq *sp;
1543         u16 low;
1544         u16 high;
1545         int rc = 1, has_rec = 0;
1546
1547         fh = fc_frame_header_get(fp);
1548         FC_EXCH_DBG(ep, "exch: BLS rctl %x - %s\n", fh->fh_r_ctl,
1549                     fc_exch_rctl_name(fh->fh_r_ctl));
1550
1551         if (cancel_delayed_work_sync(&ep->timeout_work))
1552                 fc_exch_release(ep);    /* release from pending timer hold */
1553
1554         spin_lock_bh(&ep->ex_lock);
1555         switch (fh->fh_r_ctl) {
1556         case FC_RCTL_BA_ACC:
1557                 ap = fc_frame_payload_get(fp, sizeof(*ap));
1558                 if (!ap)
1559                         break;
1560
1561                 /*
1562                  * Decide whether to establish a Recovery Qualifier.
1563                  * We do this if there is a non-empty SEQ_CNT range and
1564                  * SEQ_ID is the same as the one we aborted.
1565                  */
1566                 low = ntohs(ap->ba_low_seq_cnt);
1567                 high = ntohs(ap->ba_high_seq_cnt);
1568                 if ((ep->esb_stat & ESB_ST_REC_QUAL) == 0 &&
1569                     (ap->ba_seq_id_val != FC_BA_SEQ_ID_VAL ||
1570                      ap->ba_seq_id == ep->seq_id) && low != high) {
1571                         ep->esb_stat |= ESB_ST_REC_QUAL;
1572                         fc_exch_hold(ep);  /* hold for recovery qualifier */
1573                         has_rec = 1;
1574                 }
1575                 break;
1576         case FC_RCTL_BA_RJT:
1577                 break;
1578         default:
1579                 break;
1580         }
1581
1582         resp = ep->resp;
1583         ex_resp_arg = ep->arg;
1584
1585         /* do we need to do some other checks here. Can we reuse more of
1586          * fc_exch_recv_seq_resp
1587          */
1588         sp = &ep->seq;
1589         /*
1590          * do we want to check END_SEQ as well as LAST_SEQ here?
1591          */
1592         if (ep->fh_type != FC_TYPE_FCP &&
1593             ntoh24(fh->fh_f_ctl) & FC_FC_LAST_SEQ)
1594                 rc = fc_exch_done_locked(ep);
1595         spin_unlock_bh(&ep->ex_lock);
1596         if (!rc)
1597                 fc_exch_delete(ep);
1598
1599         if (resp)
1600                 resp(sp, fp, ex_resp_arg);
1601         else
1602                 fc_frame_free(fp);
1603
1604         if (has_rec)
1605                 fc_exch_timer_set(ep, ep->r_a_tov);
1606
1607 }
1608
1609 /**
1610  * fc_exch_recv_bls() - Handler for a BLS sequence
1611  * @mp: The EM that the exchange is on
1612  * @fp: The request frame
1613  *
1614  * The BLS frame is always a sequence initiated by the remote side.
1615  * We may be either the originator or recipient of the exchange.
1616  */
1617 static void fc_exch_recv_bls(struct fc_exch_mgr *mp, struct fc_frame *fp)
1618 {
1619         struct fc_frame_header *fh;
1620         struct fc_exch *ep;
1621         u32 f_ctl;
1622
1623         fh = fc_frame_header_get(fp);
1624         f_ctl = ntoh24(fh->fh_f_ctl);
1625         fr_seq(fp) = NULL;
1626
1627         ep = fc_exch_find(mp, (f_ctl & FC_FC_EX_CTX) ?
1628                           ntohs(fh->fh_ox_id) : ntohs(fh->fh_rx_id));
1629         if (ep && (f_ctl & FC_FC_SEQ_INIT)) {
1630                 spin_lock_bh(&ep->ex_lock);
1631                 ep->esb_stat |= ESB_ST_SEQ_INIT;
1632                 spin_unlock_bh(&ep->ex_lock);
1633         }
1634         if (f_ctl & FC_FC_SEQ_CTX) {
1635                 /*
1636                  * A response to a sequence we initiated.
1637                  * This should only be ACKs for class 2 or F.
1638                  */
1639                 switch (fh->fh_r_ctl) {
1640                 case FC_RCTL_ACK_1:
1641                 case FC_RCTL_ACK_0:
1642                         break;
1643                 default:
1644                         FC_EXCH_DBG(ep, "BLS rctl %x - %s received",
1645                                     fh->fh_r_ctl,
1646                                     fc_exch_rctl_name(fh->fh_r_ctl));
1647                         break;
1648                 }
1649                 fc_frame_free(fp);
1650         } else {
1651                 switch (fh->fh_r_ctl) {
1652                 case FC_RCTL_BA_RJT:
1653                 case FC_RCTL_BA_ACC:
1654                         if (ep)
1655                                 fc_exch_abts_resp(ep, fp);
1656                         else
1657                                 fc_frame_free(fp);
1658                         break;
1659                 case FC_RCTL_BA_ABTS:
1660                         fc_exch_recv_abts(ep, fp);
1661                         break;
1662                 default:                        /* ignore junk */
1663                         fc_frame_free(fp);
1664                         break;
1665                 }
1666         }
1667         if (ep)
1668                 fc_exch_release(ep);    /* release hold taken by fc_exch_find */
1669 }
1670
1671 /**
1672  * fc_seq_ls_acc() - Accept sequence with LS_ACC
1673  * @rx_fp: The received frame, not freed here.
1674  *
1675  * If this fails due to allocation or transmit congestion, assume the
1676  * originator will repeat the sequence.
1677  */
1678 static void fc_seq_ls_acc(struct fc_frame *rx_fp)
1679 {
1680         struct fc_lport *lport;
1681         struct fc_els_ls_acc *acc;
1682         struct fc_frame *fp;
1683
1684         lport = fr_dev(rx_fp);
1685         fp = fc_frame_alloc(lport, sizeof(*acc));
1686         if (!fp)
1687                 return;
1688         acc = fc_frame_payload_get(fp, sizeof(*acc));
1689         memset(acc, 0, sizeof(*acc));
1690         acc->la_cmd = ELS_LS_ACC;
1691         fc_fill_reply_hdr(fp, rx_fp, FC_RCTL_ELS_REP, 0);
1692         lport->tt.frame_send(lport, fp);
1693 }
1694
1695 /**
1696  * fc_seq_ls_rjt() - Reject a sequence with ELS LS_RJT
1697  * @rx_fp: The received frame, not freed here.
1698  * @reason: The reason the sequence is being rejected
1699  * @explan: The explanation for the rejection
1700  *
1701  * If this fails due to allocation or transmit congestion, assume the
1702  * originator will repeat the sequence.
1703  */
1704 static void fc_seq_ls_rjt(struct fc_frame *rx_fp, enum fc_els_rjt_reason reason,
1705                           enum fc_els_rjt_explan explan)
1706 {
1707         struct fc_lport *lport;
1708         struct fc_els_ls_rjt *rjt;
1709         struct fc_frame *fp;
1710
1711         lport = fr_dev(rx_fp);
1712         fp = fc_frame_alloc(lport, sizeof(*rjt));
1713         if (!fp)
1714                 return;
1715         rjt = fc_frame_payload_get(fp, sizeof(*rjt));
1716         memset(rjt, 0, sizeof(*rjt));
1717         rjt->er_cmd = ELS_LS_RJT;
1718         rjt->er_reason = reason;
1719         rjt->er_explan = explan;
1720         fc_fill_reply_hdr(fp, rx_fp, FC_RCTL_ELS_REP, 0);
1721         lport->tt.frame_send(lport, fp);
1722 }
1723
1724 /**
1725  * fc_exch_reset() - Reset an exchange
1726  * @ep: The exchange to be reset
1727  */
1728 static void fc_exch_reset(struct fc_exch *ep)
1729 {
1730         struct fc_seq *sp;
1731         void (*resp)(struct fc_seq *, struct fc_frame *, void *);
1732         void *arg;
1733         int rc = 1;
1734
1735         spin_lock_bh(&ep->ex_lock);
1736         fc_exch_abort_locked(ep, 0);
1737         ep->state |= FC_EX_RST_CLEANUP;
1738         if (cancel_delayed_work(&ep->timeout_work))
1739                 atomic_dec(&ep->ex_refcnt);     /* drop hold for timer */
1740         resp = ep->resp;
1741         ep->resp = NULL;
1742         if (ep->esb_stat & ESB_ST_REC_QUAL)
1743                 atomic_dec(&ep->ex_refcnt);     /* drop hold for rec_qual */
1744         ep->esb_stat &= ~ESB_ST_REC_QUAL;
1745         arg = ep->arg;
1746         sp = &ep->seq;
1747         rc = fc_exch_done_locked(ep);
1748         spin_unlock_bh(&ep->ex_lock);
1749         if (!rc)
1750                 fc_exch_delete(ep);
1751
1752         if (resp)
1753                 resp(sp, ERR_PTR(-FC_EX_CLOSED), arg);
1754 }
1755
1756 /**
1757  * fc_exch_pool_reset() - Reset a per cpu exchange pool
1758  * @lport: The local port that the exchange pool is on
1759  * @pool:  The exchange pool to be reset
1760  * @sid:   The source ID
1761  * @did:   The destination ID
1762  *
1763  * Resets a per cpu exches pool, releasing all of its sequences
1764  * and exchanges. If sid is non-zero then reset only exchanges
1765  * we sourced from the local port's FID. If did is non-zero then
1766  * only reset exchanges destined for the local port's FID.
1767  */
1768 static void fc_exch_pool_reset(struct fc_lport *lport,
1769                                struct fc_exch_pool *pool,
1770                                u32 sid, u32 did)
1771 {
1772         struct fc_exch *ep;
1773         struct fc_exch *next;
1774
1775         spin_lock_bh(&pool->lock);
1776 restart:
1777         list_for_each_entry_safe(ep, next, &pool->ex_list, ex_list) {
1778                 if ((lport == ep->lp) &&
1779                     (sid == 0 || sid == ep->sid) &&
1780                     (did == 0 || did == ep->did)) {
1781                         fc_exch_hold(ep);
1782                         spin_unlock_bh(&pool->lock);
1783
1784                         fc_exch_reset(ep);
1785
1786                         fc_exch_release(ep);
1787                         spin_lock_bh(&pool->lock);
1788
1789                         /*
1790                          * must restart loop incase while lock
1791                          * was down multiple eps were released.
1792                          */
1793                         goto restart;
1794                 }
1795         }
1796         pool->next_index = 0;
1797         pool->left = FC_XID_UNKNOWN;
1798         pool->right = FC_XID_UNKNOWN;
1799         spin_unlock_bh(&pool->lock);
1800 }
1801
1802 /**
1803  * fc_exch_mgr_reset() - Reset all EMs of a local port
1804  * @lport: The local port whose EMs are to be reset
1805  * @sid:   The source ID
1806  * @did:   The destination ID
1807  *
1808  * Reset all EMs associated with a given local port. Release all
1809  * sequences and exchanges. If sid is non-zero then reset only the
1810  * exchanges sent from the local port's FID. If did is non-zero then
1811  * reset only exchanges destined for the local port's FID.
1812  */
1813 void fc_exch_mgr_reset(struct fc_lport *lport, u32 sid, u32 did)
1814 {
1815         struct fc_exch_mgr_anchor *ema;
1816         unsigned int cpu;
1817
1818         list_for_each_entry(ema, &lport->ema_list, ema_list) {
1819                 for_each_possible_cpu(cpu)
1820                         fc_exch_pool_reset(lport,
1821                                            per_cpu_ptr(ema->mp->pool, cpu),
1822                                            sid, did);
1823         }
1824 }
1825 EXPORT_SYMBOL(fc_exch_mgr_reset);
1826
1827 /**
1828  * fc_exch_lookup() - find an exchange
1829  * @lport: The local port
1830  * @xid: The exchange ID
1831  *
1832  * Returns exchange pointer with hold for caller, or NULL if not found.
1833  */
1834 static struct fc_exch *fc_exch_lookup(struct fc_lport *lport, u32 xid)
1835 {
1836         struct fc_exch_mgr_anchor *ema;
1837
1838         list_for_each_entry(ema, &lport->ema_list, ema_list)
1839                 if (ema->mp->min_xid <= xid && xid <= ema->mp->max_xid)
1840                         return fc_exch_find(ema->mp, xid);
1841         return NULL;
1842 }
1843
1844 /**
1845  * fc_exch_els_rec() - Handler for ELS REC (Read Exchange Concise) requests
1846  * @rfp: The REC frame, not freed here.
1847  *
1848  * Note that the requesting port may be different than the S_ID in the request.
1849  */
1850 static void fc_exch_els_rec(struct fc_frame *rfp)
1851 {
1852         struct fc_lport *lport;
1853         struct fc_frame *fp;
1854         struct fc_exch *ep;
1855         struct fc_els_rec *rp;
1856         struct fc_els_rec_acc *acc;
1857         enum fc_els_rjt_reason reason = ELS_RJT_LOGIC;
1858         enum fc_els_rjt_explan explan;
1859         u32 sid;
1860         u16 rxid;
1861         u16 oxid;
1862
1863         lport = fr_dev(rfp);
1864         rp = fc_frame_payload_get(rfp, sizeof(*rp));
1865         explan = ELS_EXPL_INV_LEN;
1866         if (!rp)
1867                 goto reject;
1868         sid = ntoh24(rp->rec_s_id);
1869         rxid = ntohs(rp->rec_rx_id);
1870         oxid = ntohs(rp->rec_ox_id);
1871
1872         ep = fc_exch_lookup(lport,
1873                             sid == fc_host_port_id(lport->host) ? oxid : rxid);
1874         explan = ELS_EXPL_OXID_RXID;
1875         if (!ep)
1876                 goto reject;
1877         if (ep->oid != sid || oxid != ep->oxid)
1878                 goto rel;
1879         if (rxid != FC_XID_UNKNOWN && rxid != ep->rxid)
1880                 goto rel;
1881         fp = fc_frame_alloc(lport, sizeof(*acc));
1882         if (!fp)
1883                 goto out;
1884
1885         acc = fc_frame_payload_get(fp, sizeof(*acc));
1886         memset(acc, 0, sizeof(*acc));
1887         acc->reca_cmd = ELS_LS_ACC;
1888         acc->reca_ox_id = rp->rec_ox_id;
1889         memcpy(acc->reca_ofid, rp->rec_s_id, 3);
1890         acc->reca_rx_id = htons(ep->rxid);
1891         if (ep->sid == ep->oid)
1892                 hton24(acc->reca_rfid, ep->did);
1893         else
1894                 hton24(acc->reca_rfid, ep->sid);
1895         acc->reca_fc4value = htonl(ep->seq.rec_data);
1896         acc->reca_e_stat = htonl(ep->esb_stat & (ESB_ST_RESP |
1897                                                  ESB_ST_SEQ_INIT |
1898                                                  ESB_ST_COMPLETE));
1899         fc_fill_reply_hdr(fp, rfp, FC_RCTL_ELS_REP, 0);
1900         lport->tt.frame_send(lport, fp);
1901 out:
1902         fc_exch_release(ep);
1903         return;
1904
1905 rel:
1906         fc_exch_release(ep);
1907 reject:
1908         fc_seq_ls_rjt(rfp, reason, explan);
1909 }
1910
1911 /**
1912  * fc_exch_rrq_resp() - Handler for RRQ responses
1913  * @sp:  The sequence that the RRQ is on
1914  * @fp:  The RRQ frame
1915  * @arg: The exchange that the RRQ is on
1916  *
1917  * TODO: fix error handler.
1918  */
1919 static void fc_exch_rrq_resp(struct fc_seq *sp, struct fc_frame *fp, void *arg)
1920 {
1921         struct fc_exch *aborted_ep = arg;
1922         unsigned int op;
1923
1924         if (IS_ERR(fp)) {
1925                 int err = PTR_ERR(fp);
1926
1927                 if (err == -FC_EX_CLOSED || err == -FC_EX_TIMEOUT)
1928                         goto cleanup;
1929                 FC_EXCH_DBG(aborted_ep, "Cannot process RRQ, "
1930                             "frame error %d\n", err);
1931                 return;
1932         }
1933
1934         op = fc_frame_payload_op(fp);
1935         fc_frame_free(fp);
1936
1937         switch (op) {
1938         case ELS_LS_RJT:
1939                 FC_EXCH_DBG(aborted_ep, "LS_RJT for RRQ");
1940                 /* fall through */
1941         case ELS_LS_ACC:
1942                 goto cleanup;
1943         default:
1944                 FC_EXCH_DBG(aborted_ep, "unexpected response op %x "
1945                             "for RRQ", op);
1946                 return;
1947         }
1948
1949 cleanup:
1950         fc_exch_done(&aborted_ep->seq);
1951         /* drop hold for rec qual */
1952         fc_exch_release(aborted_ep);
1953 }
1954
1955
1956 /**
1957  * fc_exch_seq_send() - Send a frame using a new exchange and sequence
1958  * @lport:      The local port to send the frame on
1959  * @fp:         The frame to be sent
1960  * @resp:       The response handler for this request
1961  * @destructor: The destructor for the exchange
1962  * @arg:        The argument to be passed to the response handler
1963  * @timer_msec: The timeout period for the exchange
1964  *
1965  * The frame pointer with some of the header's fields must be
1966  * filled before calling this routine, those fields are:
1967  *
1968  * - routing control
1969  * - FC port did
1970  * - FC port sid
1971  * - FC header type
1972  * - frame control
1973  * - parameter or relative offset
1974  */
1975 static struct fc_seq *fc_exch_seq_send(struct fc_lport *lport,
1976                                        struct fc_frame *fp,
1977                                        void (*resp)(struct fc_seq *,
1978                                                     struct fc_frame *fp,
1979                                                     void *arg),
1980                                        void (*destructor)(struct fc_seq *,
1981                                                           void *),
1982                                        void *arg, u32 timer_msec)
1983 {
1984         struct fc_exch *ep;
1985         struct fc_seq *sp = NULL;
1986         struct fc_frame_header *fh;
1987         struct fc_fcp_pkt *fsp = NULL;
1988         int rc = 1;
1989
1990         ep = fc_exch_alloc(lport, fp);
1991         if (!ep) {
1992                 fc_frame_free(fp);
1993                 return NULL;
1994         }
1995         ep->esb_stat |= ESB_ST_SEQ_INIT;
1996         fh = fc_frame_header_get(fp);
1997         fc_exch_set_addr(ep, ntoh24(fh->fh_s_id), ntoh24(fh->fh_d_id));
1998         ep->resp = resp;
1999         ep->destructor = destructor;
2000         ep->arg = arg;
2001         ep->r_a_tov = FC_DEF_R_A_TOV;
2002         ep->lp = lport;
2003         sp = &ep->seq;
2004
2005         ep->fh_type = fh->fh_type; /* save for possbile timeout handling */
2006         ep->f_ctl = ntoh24(fh->fh_f_ctl);
2007         fc_exch_setup_hdr(ep, fp, ep->f_ctl);
2008         sp->cnt++;
2009
2010         if (ep->xid <= lport->lro_xid && fh->fh_r_ctl == FC_RCTL_DD_UNSOL_CMD) {
2011                 fsp = fr_fsp(fp);
2012                 fc_fcp_ddp_setup(fr_fsp(fp), ep->xid);
2013         }
2014
2015         if (unlikely(lport->tt.frame_send(lport, fp)))
2016                 goto err;
2017
2018         if (timer_msec)
2019                 fc_exch_timer_set_locked(ep, timer_msec);
2020         ep->f_ctl &= ~FC_FC_FIRST_SEQ;  /* not first seq */
2021
2022         if (ep->f_ctl & FC_FC_SEQ_INIT)
2023                 ep->esb_stat &= ~ESB_ST_SEQ_INIT;
2024         spin_unlock_bh(&ep->ex_lock);
2025         return sp;
2026 err:
2027         if (fsp)
2028                 fc_fcp_ddp_done(fsp);
2029         rc = fc_exch_done_locked(ep);
2030         spin_unlock_bh(&ep->ex_lock);
2031         if (!rc)
2032                 fc_exch_delete(ep);
2033         return NULL;
2034 }
2035
2036 /**
2037  * fc_exch_rrq() - Send an ELS RRQ (Reinstate Recovery Qualifier) command
2038  * @ep: The exchange to send the RRQ on
2039  *
2040  * This tells the remote port to stop blocking the use of
2041  * the exchange and the seq_cnt range.
2042  */
2043 static void fc_exch_rrq(struct fc_exch *ep)
2044 {
2045         struct fc_lport *lport;
2046         struct fc_els_rrq *rrq;
2047         struct fc_frame *fp;
2048         u32 did;
2049
2050         lport = ep->lp;
2051
2052         fp = fc_frame_alloc(lport, sizeof(*rrq));
2053         if (!fp)
2054                 goto retry;
2055
2056         rrq = fc_frame_payload_get(fp, sizeof(*rrq));
2057         memset(rrq, 0, sizeof(*rrq));
2058         rrq->rrq_cmd = ELS_RRQ;
2059         hton24(rrq->rrq_s_id, ep->sid);
2060         rrq->rrq_ox_id = htons(ep->oxid);
2061         rrq->rrq_rx_id = htons(ep->rxid);
2062
2063         did = ep->did;
2064         if (ep->esb_stat & ESB_ST_RESP)
2065                 did = ep->sid;
2066
2067         fc_fill_fc_hdr(fp, FC_RCTL_ELS_REQ, did,
2068                        lport->port_id, FC_TYPE_ELS,
2069                        FC_FC_FIRST_SEQ | FC_FC_END_SEQ | FC_FC_SEQ_INIT, 0);
2070
2071         if (fc_exch_seq_send(lport, fp, fc_exch_rrq_resp, NULL, ep,
2072                              lport->e_d_tov))
2073                 return;
2074
2075 retry:
2076         spin_lock_bh(&ep->ex_lock);
2077         if (ep->state & (FC_EX_RST_CLEANUP | FC_EX_DONE)) {
2078                 spin_unlock_bh(&ep->ex_lock);
2079                 /* drop hold for rec qual */
2080                 fc_exch_release(ep);
2081                 return;
2082         }
2083         ep->esb_stat |= ESB_ST_REC_QUAL;
2084         fc_exch_timer_set_locked(ep, ep->r_a_tov);
2085         spin_unlock_bh(&ep->ex_lock);
2086 }
2087
2088 /**
2089  * fc_exch_els_rrq() - Handler for ELS RRQ (Reset Recovery Qualifier) requests
2090  * @fp: The RRQ frame, not freed here.
2091  */
2092 static void fc_exch_els_rrq(struct fc_frame *fp)
2093 {
2094         struct fc_lport *lport;
2095         struct fc_exch *ep = NULL;      /* request or subject exchange */
2096         struct fc_els_rrq *rp;
2097         u32 sid;
2098         u16 xid;
2099         enum fc_els_rjt_explan explan;
2100
2101         lport = fr_dev(fp);
2102         rp = fc_frame_payload_get(fp, sizeof(*rp));
2103         explan = ELS_EXPL_INV_LEN;
2104         if (!rp)
2105                 goto reject;
2106
2107         /*
2108          * lookup subject exchange.
2109          */
2110         sid = ntoh24(rp->rrq_s_id);             /* subject source */
2111         xid = fc_host_port_id(lport->host) == sid ?
2112                         ntohs(rp->rrq_ox_id) : ntohs(rp->rrq_rx_id);
2113         ep = fc_exch_lookup(lport, xid);
2114         explan = ELS_EXPL_OXID_RXID;
2115         if (!ep)
2116                 goto reject;
2117         spin_lock_bh(&ep->ex_lock);
2118         if (ep->oxid != ntohs(rp->rrq_ox_id))
2119                 goto unlock_reject;
2120         if (ep->rxid != ntohs(rp->rrq_rx_id) &&
2121             ep->rxid != FC_XID_UNKNOWN)
2122                 goto unlock_reject;
2123         explan = ELS_EXPL_SID;
2124         if (ep->sid != sid)
2125                 goto unlock_reject;
2126
2127         /*
2128          * Clear Recovery Qualifier state, and cancel timer if complete.
2129          */
2130         if (ep->esb_stat & ESB_ST_REC_QUAL) {
2131                 ep->esb_stat &= ~ESB_ST_REC_QUAL;
2132                 atomic_dec(&ep->ex_refcnt);     /* drop hold for rec qual */
2133         }
2134         if (ep->esb_stat & ESB_ST_COMPLETE) {
2135                 if (cancel_delayed_work(&ep->timeout_work))
2136                         atomic_dec(&ep->ex_refcnt);     /* drop timer hold */
2137         }
2138
2139         spin_unlock_bh(&ep->ex_lock);
2140
2141         /*
2142          * Send LS_ACC.
2143          */
2144         fc_seq_ls_acc(fp);
2145         goto out;
2146
2147 unlock_reject:
2148         spin_unlock_bh(&ep->ex_lock);
2149 reject:
2150         fc_seq_ls_rjt(fp, ELS_RJT_LOGIC, explan);
2151 out:
2152         if (ep)
2153                 fc_exch_release(ep);    /* drop hold from fc_exch_find */
2154 }
2155
2156 /**
2157  * fc_exch_mgr_add() - Add an exchange manager to a local port's list of EMs
2158  * @lport: The local port to add the exchange manager to
2159  * @mp:    The exchange manager to be added to the local port
2160  * @match: The match routine that indicates when this EM should be used
2161  */
2162 struct fc_exch_mgr_anchor *fc_exch_mgr_add(struct fc_lport *lport,
2163                                            struct fc_exch_mgr *mp,
2164                                            bool (*match)(struct fc_frame *))
2165 {
2166         struct fc_exch_mgr_anchor *ema;
2167
2168         ema = kmalloc(sizeof(*ema), GFP_ATOMIC);
2169         if (!ema)
2170                 return ema;
2171
2172         ema->mp = mp;
2173         ema->match = match;
2174         /* add EM anchor to EM anchors list */
2175         list_add_tail(&ema->ema_list, &lport->ema_list);
2176         kref_get(&mp->kref);
2177         return ema;
2178 }
2179 EXPORT_SYMBOL(fc_exch_mgr_add);
2180
2181 /**
2182  * fc_exch_mgr_destroy() - Destroy an exchange manager
2183  * @kref: The reference to the EM to be destroyed
2184  */
2185 static void fc_exch_mgr_destroy(struct kref *kref)
2186 {
2187         struct fc_exch_mgr *mp = container_of(kref, struct fc_exch_mgr, kref);
2188
2189         mempool_destroy(mp->ep_pool);
2190         free_percpu(mp->pool);
2191         kfree(mp);
2192 }
2193
2194 /**
2195  * fc_exch_mgr_del() - Delete an EM from a local port's list
2196  * @ema: The exchange manager anchor identifying the EM to be deleted
2197  */
2198 void fc_exch_mgr_del(struct fc_exch_mgr_anchor *ema)
2199 {
2200         /* remove EM anchor from EM anchors list */
2201         list_del(&ema->ema_list);
2202         kref_put(&ema->mp->kref, fc_exch_mgr_destroy);
2203         kfree(ema);
2204 }
2205 EXPORT_SYMBOL(fc_exch_mgr_del);
2206
2207 /**
2208  * fc_exch_mgr_list_clone() - Share all exchange manager objects
2209  * @src: Source lport to clone exchange managers from
2210  * @dst: New lport that takes references to all the exchange managers
2211  */
2212 int fc_exch_mgr_list_clone(struct fc_lport *src, struct fc_lport *dst)
2213 {
2214         struct fc_exch_mgr_anchor *ema, *tmp;
2215
2216         list_for_each_entry(ema, &src->ema_list, ema_list) {
2217                 if (!fc_exch_mgr_add(dst, ema->mp, ema->match))
2218                         goto err;
2219         }
2220         return 0;
2221 err:
2222         list_for_each_entry_safe(ema, tmp, &dst->ema_list, ema_list)
2223                 fc_exch_mgr_del(ema);
2224         return -ENOMEM;
2225 }
2226 EXPORT_SYMBOL(fc_exch_mgr_list_clone);
2227
2228 /**
2229  * fc_exch_mgr_alloc() - Allocate an exchange manager
2230  * @lport:   The local port that the new EM will be associated with
2231  * @class:   The default FC class for new exchanges
2232  * @min_xid: The minimum XID for exchanges from the new EM
2233  * @max_xid: The maximum XID for exchanges from the new EM
2234  * @match:   The match routine for the new EM
2235  */
2236 struct fc_exch_mgr *fc_exch_mgr_alloc(struct fc_lport *lport,
2237                                       enum fc_class class,
2238                                       u16 min_xid, u16 max_xid,
2239                                       bool (*match)(struct fc_frame *))
2240 {
2241         struct fc_exch_mgr *mp;
2242         u16 pool_exch_range;
2243         size_t pool_size;
2244         unsigned int cpu;
2245         struct fc_exch_pool *pool;
2246
2247         if (max_xid <= min_xid || max_xid == FC_XID_UNKNOWN ||
2248             (min_xid & fc_cpu_mask) != 0) {
2249                 FC_LPORT_DBG(lport, "Invalid min_xid 0x:%x and max_xid 0x:%x\n",
2250                              min_xid, max_xid);
2251                 return NULL;
2252         }
2253
2254         /*
2255          * allocate memory for EM
2256          */
2257         mp = kzalloc(sizeof(struct fc_exch_mgr), GFP_ATOMIC);
2258         if (!mp)
2259                 return NULL;
2260
2261         mp->class = class;
2262         /* adjust em exch xid range for offload */
2263         mp->min_xid = min_xid;
2264         mp->max_xid = max_xid;
2265
2266         mp->ep_pool = mempool_create_slab_pool(2, fc_em_cachep);
2267         if (!mp->ep_pool)
2268                 goto free_mp;
2269
2270         /*
2271          * Setup per cpu exch pool with entire exchange id range equally
2272          * divided across all cpus. The exch pointers array memory is
2273          * allocated for exch range per pool.
2274          */
2275         pool_exch_range = (mp->max_xid - mp->min_xid + 1) / (fc_cpu_mask + 1);
2276         mp->pool_max_index = pool_exch_range - 1;
2277
2278         /*
2279          * Allocate and initialize per cpu exch pool
2280          */
2281         pool_size = sizeof(*pool) + pool_exch_range * sizeof(struct fc_exch *);
2282         mp->pool = __alloc_percpu(pool_size, __alignof__(struct fc_exch_pool));
2283         if (!mp->pool)
2284                 goto free_mempool;
2285         for_each_possible_cpu(cpu) {
2286                 pool = per_cpu_ptr(mp->pool, cpu);
2287                 pool->next_index = 0;
2288                 pool->left = FC_XID_UNKNOWN;
2289                 pool->right = FC_XID_UNKNOWN;
2290                 spin_lock_init(&pool->lock);
2291                 INIT_LIST_HEAD(&pool->ex_list);
2292         }
2293
2294         kref_init(&mp->kref);
2295         if (!fc_exch_mgr_add(lport, mp, match)) {
2296                 free_percpu(mp->pool);
2297                 goto free_mempool;
2298         }
2299
2300         /*
2301          * Above kref_init() sets mp->kref to 1 and then
2302          * call to fc_exch_mgr_add incremented mp->kref again,
2303          * so adjust that extra increment.
2304          */
2305         kref_put(&mp->kref, fc_exch_mgr_destroy);
2306         return mp;
2307
2308 free_mempool:
2309         mempool_destroy(mp->ep_pool);
2310 free_mp:
2311         kfree(mp);
2312         return NULL;
2313 }
2314 EXPORT_SYMBOL(fc_exch_mgr_alloc);
2315
2316 /**
2317  * fc_exch_mgr_free() - Free all exchange managers on a local port
2318  * @lport: The local port whose EMs are to be freed
2319  */
2320 void fc_exch_mgr_free(struct fc_lport *lport)
2321 {
2322         struct fc_exch_mgr_anchor *ema, *next;
2323
2324         flush_workqueue(fc_exch_workqueue);
2325         list_for_each_entry_safe(ema, next, &lport->ema_list, ema_list)
2326                 fc_exch_mgr_del(ema);
2327 }
2328 EXPORT_SYMBOL(fc_exch_mgr_free);
2329
2330 /**
2331  * fc_find_ema() - Lookup and return appropriate Exchange Manager Anchor depending
2332  * upon 'xid'.
2333  * @f_ctl: f_ctl
2334  * @lport: The local port the frame was received on
2335  * @fh: The received frame header
2336  */
2337 static struct fc_exch_mgr_anchor *fc_find_ema(u32 f_ctl,
2338                                               struct fc_lport *lport,
2339                                               struct fc_frame_header *fh)
2340 {
2341         struct fc_exch_mgr_anchor *ema;
2342         u16 xid;
2343
2344         if (f_ctl & FC_FC_EX_CTX)
2345                 xid = ntohs(fh->fh_ox_id);
2346         else {
2347                 xid = ntohs(fh->fh_rx_id);
2348                 if (xid == FC_XID_UNKNOWN)
2349                         return list_entry(lport->ema_list.prev,
2350                                           typeof(*ema), ema_list);
2351         }
2352
2353         list_for_each_entry(ema, &lport->ema_list, ema_list) {
2354                 if ((xid >= ema->mp->min_xid) &&
2355                     (xid <= ema->mp->max_xid))
2356                         return ema;
2357         }
2358         return NULL;
2359 }
2360 /**
2361  * fc_exch_recv() - Handler for received frames
2362  * @lport: The local port the frame was received on
2363  * @fp: The received frame
2364  */
2365 void fc_exch_recv(struct fc_lport *lport, struct fc_frame *fp)
2366 {
2367         struct fc_frame_header *fh = fc_frame_header_get(fp);
2368         struct fc_exch_mgr_anchor *ema;
2369         u32 f_ctl;
2370
2371         /* lport lock ? */
2372         if (!lport || lport->state == LPORT_ST_DISABLED) {
2373                 FC_LPORT_DBG(lport, "Receiving frames for an lport that "
2374                              "has not been initialized correctly\n");
2375                 fc_frame_free(fp);
2376                 return;
2377         }
2378
2379         f_ctl = ntoh24(fh->fh_f_ctl);
2380         ema = fc_find_ema(f_ctl, lport, fh);
2381         if (!ema) {
2382                 FC_LPORT_DBG(lport, "Unable to find Exchange Manager Anchor,"
2383                                     "fc_ctl <0x%x>, xid <0x%x>\n",
2384                                      f_ctl,
2385                                      (f_ctl & FC_FC_EX_CTX) ?
2386                                      ntohs(fh->fh_ox_id) :
2387                                      ntohs(fh->fh_rx_id));
2388                 fc_frame_free(fp);
2389                 return;
2390         }
2391
2392         /*
2393          * If frame is marked invalid, just drop it.
2394          */
2395         switch (fr_eof(fp)) {
2396         case FC_EOF_T:
2397                 if (f_ctl & FC_FC_END_SEQ)
2398                         skb_trim(fp_skb(fp), fr_len(fp) - FC_FC_FILL(f_ctl));
2399                 /* fall through */
2400         case FC_EOF_N:
2401                 if (fh->fh_type == FC_TYPE_BLS)
2402                         fc_exch_recv_bls(ema->mp, fp);
2403                 else if ((f_ctl & (FC_FC_EX_CTX | FC_FC_SEQ_CTX)) ==
2404                          FC_FC_EX_CTX)
2405                         fc_exch_recv_seq_resp(ema->mp, fp);
2406                 else if (f_ctl & FC_FC_SEQ_CTX)
2407                         fc_exch_recv_resp(ema->mp, fp);
2408                 else    /* no EX_CTX and no SEQ_CTX */
2409                         fc_exch_recv_req(lport, ema->mp, fp);
2410                 break;
2411         default:
2412                 FC_LPORT_DBG(lport, "dropping invalid frame (eof %x)",
2413                              fr_eof(fp));
2414                 fc_frame_free(fp);
2415         }
2416 }
2417 EXPORT_SYMBOL(fc_exch_recv);
2418
2419 /**
2420  * fc_exch_init() - Initialize the exchange layer for a local port
2421  * @lport: The local port to initialize the exchange layer for
2422  */
2423 int fc_exch_init(struct fc_lport *lport)
2424 {
2425         if (!lport->tt.seq_start_next)
2426                 lport->tt.seq_start_next = fc_seq_start_next;
2427
2428         if (!lport->tt.seq_set_resp)
2429                 lport->tt.seq_set_resp = fc_seq_set_resp;
2430
2431         if (!lport->tt.exch_seq_send)
2432                 lport->tt.exch_seq_send = fc_exch_seq_send;
2433
2434         if (!lport->tt.seq_send)
2435                 lport->tt.seq_send = fc_seq_send;
2436
2437         if (!lport->tt.seq_els_rsp_send)
2438                 lport->tt.seq_els_rsp_send = fc_seq_els_rsp_send;
2439
2440         if (!lport->tt.exch_done)
2441                 lport->tt.exch_done = fc_exch_done;
2442
2443         if (!lport->tt.exch_mgr_reset)
2444                 lport->tt.exch_mgr_reset = fc_exch_mgr_reset;
2445
2446         if (!lport->tt.seq_exch_abort)
2447                 lport->tt.seq_exch_abort = fc_seq_exch_abort;
2448
2449         if (!lport->tt.seq_assign)
2450                 lport->tt.seq_assign = fc_seq_assign;
2451
2452         if (!lport->tt.seq_release)
2453                 lport->tt.seq_release = fc_seq_release;
2454
2455         return 0;
2456 }
2457 EXPORT_SYMBOL(fc_exch_init);
2458
2459 /**
2460  * fc_setup_exch_mgr() - Setup an exchange manager
2461  */
2462 int fc_setup_exch_mgr(void)
2463 {
2464         fc_em_cachep = kmem_cache_create("libfc_em", sizeof(struct fc_exch),
2465                                          0, SLAB_HWCACHE_ALIGN, NULL);
2466         if (!fc_em_cachep)
2467                 return -ENOMEM;
2468
2469         /*
2470          * Initialize fc_cpu_mask and fc_cpu_order. The
2471          * fc_cpu_mask is set for nr_cpu_ids rounded up
2472          * to order of 2's * power and order is stored
2473          * in fc_cpu_order as this is later required in
2474          * mapping between an exch id and exch array index
2475          * in per cpu exch pool.
2476          *
2477          * This round up is required to align fc_cpu_mask
2478          * to exchange id's lower bits such that all incoming
2479          * frames of an exchange gets delivered to the same
2480          * cpu on which exchange originated by simple bitwise
2481          * AND operation between fc_cpu_mask and exchange id.
2482          */
2483         fc_cpu_mask = 1;
2484         fc_cpu_order = 0;
2485         while (fc_cpu_mask < nr_cpu_ids) {
2486                 fc_cpu_mask <<= 1;
2487                 fc_cpu_order++;
2488         }
2489         fc_cpu_mask--;
2490
2491         fc_exch_workqueue = create_singlethread_workqueue("fc_exch_workqueue");
2492         if (!fc_exch_workqueue)
2493                 goto err;
2494         return 0;
2495 err:
2496         kmem_cache_destroy(fc_em_cachep);
2497         return -ENOMEM;
2498 }
2499
2500 /**
2501  * fc_destroy_exch_mgr() - Destroy an exchange manager
2502  */
2503 void fc_destroy_exch_mgr(void)
2504 {
2505         destroy_workqueue(fc_exch_workqueue);
2506         kmem_cache_destroy(fc_em_cachep);
2507 }