blob: 751a485685d989c1e26d764c8949ceaee4a078bc [file] [log] [blame]
Robert Love42e9a922008-12-09 15:10:17 -08001/*
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/gfp.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
Robert Love8866a5d2009-11-03 11:45:58 -080035#include "fc_libfc.h"
36
Vasu Deve4bc50b2009-08-25 13:58:47 -070037u16 fc_cpu_mask; /* cpu mask for possible cpus */
38EXPORT_SYMBOL(fc_cpu_mask);
39static u16 fc_cpu_order; /* 2's power to represent total possible cpus */
Robert Love74147052009-06-10 15:31:10 -070040static struct kmem_cache *fc_em_cachep; /* cache for exchanges */
Robert Love42e9a922008-12-09 15:10:17 -080041
42/*
43 * Structure and function definitions for managing Fibre Channel Exchanges
44 * and Sequences.
45 *
46 * The three primary structures used here are fc_exch_mgr, fc_exch, and fc_seq.
47 *
48 * fc_exch_mgr holds the exchange state for an N port
49 *
50 * fc_exch holds state for one exchange and links to its active sequence.
51 *
52 * fc_seq holds the state for an individual sequence.
53 */
54
55/*
Vasu Deve4bc50b2009-08-25 13:58:47 -070056 * Per cpu exchange pool
57 *
58 * This structure manages per cpu exchanges in array of exchange pointers.
59 * This array is allocated followed by struct fc_exch_pool memory for
60 * assigned range of exchanges to per cpu pool.
61 */
62struct fc_exch_pool {
63 u16 next_index; /* next possible free exchange index */
64 u16 total_exches; /* total allocated exchanges */
65 spinlock_t lock; /* exch pool lock */
66 struct list_head ex_list; /* allocated exchanges list */
67};
68
69/*
Robert Love42e9a922008-12-09 15:10:17 -080070 * Exchange manager.
71 *
72 * This structure is the center for creating exchanges and sequences.
73 * It manages the allocation of exchange IDs.
74 */
75struct fc_exch_mgr {
76 enum fc_class class; /* default class for sequences */
Vasu Dev96316092009-07-29 17:05:00 -070077 struct kref kref; /* exchange mgr reference count */
Robert Love42e9a922008-12-09 15:10:17 -080078 u16 min_xid; /* min exchange ID */
79 u16 max_xid; /* max exchange ID */
Robert Love42e9a922008-12-09 15:10:17 -080080 mempool_t *ep_pool; /* reserve ep's */
Vasu Deve4bc50b2009-08-25 13:58:47 -070081 u16 pool_max_index; /* max exch array index in exch pool */
82 struct fc_exch_pool *pool; /* per cpu exch pool */
Robert Love42e9a922008-12-09 15:10:17 -080083
84 /*
85 * currently exchange mgr stats are updated but not used.
86 * either stats can be expose via sysfs or remove them
87 * all together if not used XXX
88 */
89 struct {
90 atomic_t no_free_exch;
91 atomic_t no_free_exch_xid;
92 atomic_t xid_not_found;
93 atomic_t xid_busy;
94 atomic_t seq_not_found;
95 atomic_t non_bls_resp;
96 } stats;
Robert Love42e9a922008-12-09 15:10:17 -080097};
98#define fc_seq_exch(sp) container_of(sp, struct fc_exch, seq)
99
Vasu Dev96316092009-07-29 17:05:00 -0700100struct fc_exch_mgr_anchor {
101 struct list_head ema_list;
102 struct fc_exch_mgr *mp;
103 bool (*match)(struct fc_frame *);
104};
105
Robert Love42e9a922008-12-09 15:10:17 -0800106static void fc_exch_rrq(struct fc_exch *);
107static void fc_seq_ls_acc(struct fc_seq *);
108static void fc_seq_ls_rjt(struct fc_seq *, enum fc_els_rjt_reason,
109 enum fc_els_rjt_explan);
110static void fc_exch_els_rec(struct fc_seq *, struct fc_frame *);
111static void fc_exch_els_rrq(struct fc_seq *, struct fc_frame *);
Robert Love42e9a922008-12-09 15:10:17 -0800112
113/*
114 * Internal implementation notes.
115 *
116 * The exchange manager is one by default in libfc but LLD may choose
117 * to have one per CPU. The sequence manager is one per exchange manager
118 * and currently never separated.
119 *
120 * Section 9.8 in FC-FS-2 specifies: "The SEQ_ID is a one-byte field
121 * assigned by the Sequence Initiator that shall be unique for a specific
122 * D_ID and S_ID pair while the Sequence is open." Note that it isn't
123 * qualified by exchange ID, which one might think it would be.
124 * In practice this limits the number of open sequences and exchanges to 256
125 * per session. For most targets we could treat this limit as per exchange.
126 *
127 * The exchange and its sequence are freed when the last sequence is received.
128 * It's possible for the remote port to leave an exchange open without
129 * sending any sequences.
130 *
131 * Notes on reference counts:
132 *
133 * Exchanges are reference counted and exchange gets freed when the reference
134 * count becomes zero.
135 *
136 * Timeouts:
137 * Sequences are timed out for E_D_TOV and R_A_TOV.
138 *
139 * Sequence event handling:
140 *
141 * The following events may occur on initiator sequences:
142 *
143 * Send.
144 * For now, the whole thing is sent.
145 * Receive ACK
146 * This applies only to class F.
147 * The sequence is marked complete.
148 * ULP completion.
149 * The upper layer calls fc_exch_done() when done
150 * with exchange and sequence tuple.
151 * RX-inferred completion.
152 * When we receive the next sequence on the same exchange, we can
153 * retire the previous sequence ID. (XXX not implemented).
154 * Timeout.
155 * R_A_TOV frees the sequence ID. If we're waiting for ACK,
156 * E_D_TOV causes abort and calls upper layer response handler
157 * with FC_EX_TIMEOUT error.
158 * Receive RJT
159 * XXX defer.
160 * Send ABTS
161 * On timeout.
162 *
163 * The following events may occur on recipient sequences:
164 *
165 * Receive
166 * Allocate sequence for first frame received.
167 * Hold during receive handler.
168 * Release when final frame received.
169 * Keep status of last N of these for the ELS RES command. XXX TBD.
170 * Receive ABTS
171 * Deallocate sequence
172 * Send RJT
173 * Deallocate
174 *
175 * For now, we neglect conditions where only part of a sequence was
176 * received or transmitted, or where out-of-order receipt is detected.
177 */
178
179/*
180 * Locking notes:
181 *
182 * The EM code run in a per-CPU worker thread.
183 *
184 * To protect against concurrency between a worker thread code and timers,
185 * sequence allocation and deallocation must be locked.
186 * - exchange refcnt can be done atomicly without locks.
187 * - sequence allocation must be locked by exch lock.
Vasu Devb2f00912009-08-25 13:58:53 -0700188 * - If the EM pool lock and ex_lock must be taken at the same time, then the
189 * EM pool lock must be taken before the ex_lock.
Robert Love42e9a922008-12-09 15:10:17 -0800190 */
191
192/*
193 * opcode names for debugging.
194 */
195static char *fc_exch_rctl_names[] = FC_RCTL_NAMES_INIT;
196
197#define FC_TABLE_SIZE(x) (sizeof(x) / sizeof(x[0]))
198
199static inline const char *fc_exch_name_lookup(unsigned int op, char **table,
200 unsigned int max_index)
201{
202 const char *name = NULL;
203
204 if (op < max_index)
205 name = table[op];
206 if (!name)
207 name = "unknown";
208 return name;
209}
210
211static const char *fc_exch_rctl_name(unsigned int op)
212{
213 return fc_exch_name_lookup(op, fc_exch_rctl_names,
214 FC_TABLE_SIZE(fc_exch_rctl_names));
215}
216
217/*
218 * Hold an exchange - keep it from being freed.
219 */
220static void fc_exch_hold(struct fc_exch *ep)
221{
222 atomic_inc(&ep->ex_refcnt);
223}
224
225/*
226 * setup fc hdr by initializing few more FC header fields and sof/eof.
227 * Initialized fields by this func:
228 * - fh_ox_id, fh_rx_id, fh_seq_id, fh_seq_cnt
229 * - sof and eof
230 */
231static void fc_exch_setup_hdr(struct fc_exch *ep, struct fc_frame *fp,
232 u32 f_ctl)
233{
234 struct fc_frame_header *fh = fc_frame_header_get(fp);
235 u16 fill;
236
237 fr_sof(fp) = ep->class;
238 if (ep->seq.cnt)
239 fr_sof(fp) = fc_sof_normal(ep->class);
240
241 if (f_ctl & FC_FC_END_SEQ) {
242 fr_eof(fp) = FC_EOF_T;
243 if (fc_sof_needs_ack(ep->class))
244 fr_eof(fp) = FC_EOF_N;
245 /*
246 * Form f_ctl.
247 * The number of fill bytes to make the length a 4-byte
248 * multiple is the low order 2-bits of the f_ctl.
249 * The fill itself will have been cleared by the frame
250 * allocation.
251 * After this, the length will be even, as expected by
252 * the transport.
253 */
254 fill = fr_len(fp) & 3;
255 if (fill) {
256 fill = 4 - fill;
257 /* TODO, this may be a problem with fragmented skb */
258 skb_put(fp_skb(fp), fill);
259 hton24(fh->fh_f_ctl, f_ctl | fill);
260 }
261 } else {
262 WARN_ON(fr_len(fp) % 4 != 0); /* no pad to non last frame */
263 fr_eof(fp) = FC_EOF_N;
264 }
265
266 /*
267 * Initialize remainig fh fields
268 * from fc_fill_fc_hdr
269 */
270 fh->fh_ox_id = htons(ep->oxid);
271 fh->fh_rx_id = htons(ep->rxid);
272 fh->fh_seq_id = ep->seq.id;
273 fh->fh_seq_cnt = htons(ep->seq.cnt);
274}
275
Robert Love42e9a922008-12-09 15:10:17 -0800276/*
277 * Release a reference to an exchange.
278 * If the refcnt goes to zero and the exchange is complete, it is freed.
279 */
280static void fc_exch_release(struct fc_exch *ep)
281{
282 struct fc_exch_mgr *mp;
283
284 if (atomic_dec_and_test(&ep->ex_refcnt)) {
285 mp = ep->em;
286 if (ep->destructor)
287 ep->destructor(&ep->seq, ep->arg);
Julia Lawallaa6cd292009-02-04 22:17:29 +0100288 WARN_ON(!(ep->esb_stat & ESB_ST_COMPLETE));
Robert Love42e9a922008-12-09 15:10:17 -0800289 mempool_free(ep, mp->ep_pool);
290 }
291}
292
293static int fc_exch_done_locked(struct fc_exch *ep)
294{
295 int rc = 1;
296
297 /*
298 * We must check for completion in case there are two threads
299 * tyring to complete this. But the rrq code will reuse the
300 * ep, and in that case we only clear the resp and set it as
301 * complete, so it can be reused by the timer to send the rrq.
302 */
303 ep->resp = NULL;
304 if (ep->state & FC_EX_DONE)
305 return rc;
306 ep->esb_stat |= ESB_ST_COMPLETE;
307
308 if (!(ep->esb_stat & ESB_ST_REC_QUAL)) {
309 ep->state |= FC_EX_DONE;
310 if (cancel_delayed_work(&ep->timeout_work))
311 atomic_dec(&ep->ex_refcnt); /* drop hold for timer */
312 rc = 0;
313 }
314 return rc;
315}
316
Vasu Deve4bc50b2009-08-25 13:58:47 -0700317static inline struct fc_exch *fc_exch_ptr_get(struct fc_exch_pool *pool,
318 u16 index)
319{
320 struct fc_exch **exches = (struct fc_exch **)(pool + 1);
321 return exches[index];
322}
323
324static inline void fc_exch_ptr_set(struct fc_exch_pool *pool, u16 index,
325 struct fc_exch *ep)
326{
327 ((struct fc_exch **)(pool + 1))[index] = ep;
328}
329
Vasu Devb2f00912009-08-25 13:58:53 -0700330static void fc_exch_delete(struct fc_exch *ep)
Robert Love42e9a922008-12-09 15:10:17 -0800331{
Vasu Devb2f00912009-08-25 13:58:53 -0700332 struct fc_exch_pool *pool;
Robert Love42e9a922008-12-09 15:10:17 -0800333
Vasu Devb2f00912009-08-25 13:58:53 -0700334 pool = ep->pool;
335 spin_lock_bh(&pool->lock);
336 WARN_ON(pool->total_exches <= 0);
337 pool->total_exches--;
338 fc_exch_ptr_set(pool, (ep->xid - ep->em->min_xid) >> fc_cpu_order,
339 NULL);
Robert Love42e9a922008-12-09 15:10:17 -0800340 list_del(&ep->ex_list);
Vasu Devb2f00912009-08-25 13:58:53 -0700341 spin_unlock_bh(&pool->lock);
Robert Love42e9a922008-12-09 15:10:17 -0800342 fc_exch_release(ep); /* drop hold for exch in mp */
343}
344
345/*
346 * Internal version of fc_exch_timer_set - used with lock held.
347 */
348static inline void fc_exch_timer_set_locked(struct fc_exch *ep,
349 unsigned int timer_msec)
350{
351 if (ep->state & (FC_EX_RST_CLEANUP | FC_EX_DONE))
352 return;
353
Robert Lovecd305ce2009-08-25 13:58:37 -0700354 FC_EXCH_DBG(ep, "Exchange timer armed\n");
Robert Love74147052009-06-10 15:31:10 -0700355
Robert Love42e9a922008-12-09 15:10:17 -0800356 if (schedule_delayed_work(&ep->timeout_work,
357 msecs_to_jiffies(timer_msec)))
358 fc_exch_hold(ep); /* hold for timer */
359}
360
361/*
362 * Set timer for an exchange.
363 * The time is a minimum delay in milliseconds until the timer fires.
364 * Used for upper level protocols to time out the exchange.
365 * The timer is cancelled when it fires or when the exchange completes.
366 * Returns non-zero if a timer couldn't be allocated.
367 */
368static void fc_exch_timer_set(struct fc_exch *ep, unsigned int timer_msec)
369{
370 spin_lock_bh(&ep->ex_lock);
371 fc_exch_timer_set_locked(ep, timer_msec);
372 spin_unlock_bh(&ep->ex_lock);
373}
374
Robert Love1a7b75a2009-11-03 11:45:47 -0800375/**
376 * send a frame using existing sequence and exchange.
377 */
378static int fc_seq_send(struct fc_lport *lp, struct fc_seq *sp,
379 struct fc_frame *fp)
380{
381 struct fc_exch *ep;
382 struct fc_frame_header *fh = fc_frame_header_get(fp);
383 int error;
384 u32 f_ctl;
385
386 ep = fc_seq_exch(sp);
387 WARN_ON((ep->esb_stat & ESB_ST_SEQ_INIT) != ESB_ST_SEQ_INIT);
388
389 f_ctl = ntoh24(fh->fh_f_ctl);
390 fc_exch_setup_hdr(ep, fp, f_ctl);
391
392 /*
393 * update sequence count if this frame is carrying
394 * multiple FC frames when sequence offload is enabled
395 * by LLD.
396 */
397 if (fr_max_payload(fp))
398 sp->cnt += DIV_ROUND_UP((fr_len(fp) - sizeof(*fh)),
399 fr_max_payload(fp));
400 else
401 sp->cnt++;
402
403 /*
404 * Send the frame.
405 */
406 error = lp->tt.frame_send(lp, fp);
407
408 /*
409 * Update the exchange and sequence flags,
410 * assuming all frames for the sequence have been sent.
411 * We can only be called to send once for each sequence.
412 */
413 spin_lock_bh(&ep->ex_lock);
414 ep->f_ctl = f_ctl & ~FC_FC_FIRST_SEQ; /* not first seq */
415 if (f_ctl & (FC_FC_END_SEQ | FC_FC_SEQ_INIT))
416 ep->esb_stat &= ~ESB_ST_SEQ_INIT;
417 spin_unlock_bh(&ep->ex_lock);
418 return error;
419}
420
421/**
422 * fc_seq_alloc() - Allocate a sequence.
423 * @ep: Exchange pointer
424 * @seq_id: Sequence ID to allocate a sequence for
425 *
426 * We don't support multiple originated sequences on the same exchange.
427 * By implication, any previously originated sequence on this exchange
428 * is complete, and we reallocate the same sequence.
429 */
430static struct fc_seq *fc_seq_alloc(struct fc_exch *ep, u8 seq_id)
431{
432 struct fc_seq *sp;
433
434 sp = &ep->seq;
435 sp->ssb_stat = 0;
436 sp->cnt = 0;
437 sp->id = seq_id;
438 return sp;
439}
440
441static struct fc_seq *fc_seq_start_next_locked(struct fc_seq *sp)
442{
443 struct fc_exch *ep = fc_seq_exch(sp);
444
445 sp = fc_seq_alloc(ep, ep->seq_id++);
446 FC_EXCH_DBG(ep, "f_ctl %6x seq %2x\n",
447 ep->f_ctl, sp->id);
448 return sp;
449}
450
451/**
452 * Allocate a new sequence on the same exchange as the supplied sequence.
453 * This will never return NULL.
454 */
455static struct fc_seq *fc_seq_start_next(struct fc_seq *sp)
456{
457 struct fc_exch *ep = fc_seq_exch(sp);
458
459 spin_lock_bh(&ep->ex_lock);
460 sp = fc_seq_start_next_locked(sp);
461 spin_unlock_bh(&ep->ex_lock);
462
463 return sp;
464}
465
466/**
467 * This function is for seq_exch_abort function pointer in
468 * struct libfc_function_template, see comment block on
469 * seq_exch_abort for description of this function.
470 */
471static int fc_seq_exch_abort(const struct fc_seq *req_sp,
472 unsigned int timer_msec)
Robert Love42e9a922008-12-09 15:10:17 -0800473{
474 struct fc_seq *sp;
475 struct fc_exch *ep;
476 struct fc_frame *fp;
477 int error;
478
479 ep = fc_seq_exch(req_sp);
480
481 spin_lock_bh(&ep->ex_lock);
482 if (ep->esb_stat & (ESB_ST_COMPLETE | ESB_ST_ABNORMAL) ||
483 ep->state & (FC_EX_DONE | FC_EX_RST_CLEANUP)) {
484 spin_unlock_bh(&ep->ex_lock);
485 return -ENXIO;
486 }
487
488 /*
489 * Send the abort on a new sequence if possible.
490 */
491 sp = fc_seq_start_next_locked(&ep->seq);
492 if (!sp) {
493 spin_unlock_bh(&ep->ex_lock);
494 return -ENOMEM;
495 }
496
497 ep->esb_stat |= ESB_ST_SEQ_INIT | ESB_ST_ABNORMAL;
498 if (timer_msec)
499 fc_exch_timer_set_locked(ep, timer_msec);
500 spin_unlock_bh(&ep->ex_lock);
501
502 /*
503 * If not logged into the fabric, don't send ABTS but leave
504 * sequence active until next timeout.
505 */
506 if (!ep->sid)
507 return 0;
508
509 /*
510 * Send an abort for the sequence that timed out.
511 */
512 fp = fc_frame_alloc(ep->lp, 0);
513 if (fp) {
514 fc_fill_fc_hdr(fp, FC_RCTL_BA_ABTS, ep->did, ep->sid,
515 FC_TYPE_BLS, FC_FC_END_SEQ | FC_FC_SEQ_INIT, 0);
516 error = fc_seq_send(ep->lp, sp, fp);
517 } else
518 error = -ENOBUFS;
519 return error;
520}
Robert Love42e9a922008-12-09 15:10:17 -0800521
522/*
523 * Exchange timeout - handle exchange timer expiration.
524 * The timer will have been cancelled before this is called.
525 */
526static void fc_exch_timeout(struct work_struct *work)
527{
528 struct fc_exch *ep = container_of(work, struct fc_exch,
529 timeout_work.work);
530 struct fc_seq *sp = &ep->seq;
531 void (*resp)(struct fc_seq *, struct fc_frame *fp, void *arg);
532 void *arg;
533 u32 e_stat;
534 int rc = 1;
535
Robert Lovecd305ce2009-08-25 13:58:37 -0700536 FC_EXCH_DBG(ep, "Exchange timed out\n");
537
Robert Love42e9a922008-12-09 15:10:17 -0800538 spin_lock_bh(&ep->ex_lock);
539 if (ep->state & (FC_EX_RST_CLEANUP | FC_EX_DONE))
540 goto unlock;
541
542 e_stat = ep->esb_stat;
543 if (e_stat & ESB_ST_COMPLETE) {
544 ep->esb_stat = e_stat & ~ESB_ST_REC_QUAL;
Vasu Deva0cc1ec2009-07-28 17:33:37 -0700545 spin_unlock_bh(&ep->ex_lock);
Robert Love42e9a922008-12-09 15:10:17 -0800546 if (e_stat & ESB_ST_REC_QUAL)
547 fc_exch_rrq(ep);
Robert Love42e9a922008-12-09 15:10:17 -0800548 goto done;
549 } else {
550 resp = ep->resp;
551 arg = ep->arg;
552 ep->resp = NULL;
553 if (e_stat & ESB_ST_ABNORMAL)
554 rc = fc_exch_done_locked(ep);
555 spin_unlock_bh(&ep->ex_lock);
556 if (!rc)
Vasu Devb2f00912009-08-25 13:58:53 -0700557 fc_exch_delete(ep);
Robert Love42e9a922008-12-09 15:10:17 -0800558 if (resp)
559 resp(sp, ERR_PTR(-FC_EX_TIMEOUT), arg);
560 fc_seq_exch_abort(sp, 2 * ep->r_a_tov);
561 goto done;
562 }
563unlock:
564 spin_unlock_bh(&ep->ex_lock);
565done:
566 /*
567 * This release matches the hold taken when the timer was set.
568 */
569 fc_exch_release(ep);
570}
571
Vasu Dev52ff8782009-07-29 17:05:10 -0700572/**
573 * fc_exch_em_alloc() - allocate an exchange from a specified EM.
574 * @lport: ptr to the local port
575 * @mp: ptr to the exchange manager
Robert Love42e9a922008-12-09 15:10:17 -0800576 *
Vasu Devd7179682009-07-29 17:05:21 -0700577 * Returns pointer to allocated fc_exch with exch lock held.
Robert Love42e9a922008-12-09 15:10:17 -0800578 */
Vasu Dev52ff8782009-07-29 17:05:10 -0700579static struct fc_exch *fc_exch_em_alloc(struct fc_lport *lport,
Vasu Devd7179682009-07-29 17:05:21 -0700580 struct fc_exch_mgr *mp)
Robert Love42e9a922008-12-09 15:10:17 -0800581{
582 struct fc_exch *ep;
Vasu Devb2f00912009-08-25 13:58:53 -0700583 unsigned int cpu;
584 u16 index;
585 struct fc_exch_pool *pool;
Robert Love42e9a922008-12-09 15:10:17 -0800586
587 /* allocate memory for exchange */
588 ep = mempool_alloc(mp->ep_pool, GFP_ATOMIC);
589 if (!ep) {
590 atomic_inc(&mp->stats.no_free_exch);
591 goto out;
592 }
593 memset(ep, 0, sizeof(*ep));
594
Vasu Devb2f00912009-08-25 13:58:53 -0700595 cpu = smp_processor_id();
596 pool = per_cpu_ptr(mp->pool, cpu);
597 spin_lock_bh(&pool->lock);
598 index = pool->next_index;
599 /* allocate new exch from pool */
600 while (fc_exch_ptr_get(pool, index)) {
601 index = index == mp->pool_max_index ? 0 : index + 1;
602 if (index == pool->next_index)
Robert Love42e9a922008-12-09 15:10:17 -0800603 goto err;
Robert Love42e9a922008-12-09 15:10:17 -0800604 }
Vasu Devb2f00912009-08-25 13:58:53 -0700605 pool->next_index = index == mp->pool_max_index ? 0 : index + 1;
Robert Love42e9a922008-12-09 15:10:17 -0800606
607 fc_exch_hold(ep); /* hold for exch in mp */
608 spin_lock_init(&ep->ex_lock);
609 /*
610 * Hold exch lock for caller to prevent fc_exch_reset()
611 * from releasing exch while fc_exch_alloc() caller is
612 * still working on exch.
613 */
614 spin_lock_bh(&ep->ex_lock);
615
Vasu Devb2f00912009-08-25 13:58:53 -0700616 fc_exch_ptr_set(pool, index, ep);
617 list_add_tail(&ep->ex_list, &pool->ex_list);
Robert Love42e9a922008-12-09 15:10:17 -0800618 fc_seq_alloc(ep, ep->seq_id++);
Vasu Devb2f00912009-08-25 13:58:53 -0700619 pool->total_exches++;
620 spin_unlock_bh(&pool->lock);
Robert Love42e9a922008-12-09 15:10:17 -0800621
622 /*
623 * update exchange
624 */
Vasu Devb2f00912009-08-25 13:58:53 -0700625 ep->oxid = ep->xid = (index << fc_cpu_order | cpu) + mp->min_xid;
Robert Love42e9a922008-12-09 15:10:17 -0800626 ep->em = mp;
Vasu Devb2f00912009-08-25 13:58:53 -0700627 ep->pool = pool;
Vasu Dev52ff8782009-07-29 17:05:10 -0700628 ep->lp = lport;
Robert Love42e9a922008-12-09 15:10:17 -0800629 ep->f_ctl = FC_FC_FIRST_SEQ; /* next seq is first seq */
630 ep->rxid = FC_XID_UNKNOWN;
631 ep->class = mp->class;
632 INIT_DELAYED_WORK(&ep->timeout_work, fc_exch_timeout);
633out:
634 return ep;
635err:
Vasu Devb2f00912009-08-25 13:58:53 -0700636 spin_unlock_bh(&pool->lock);
Robert Love42e9a922008-12-09 15:10:17 -0800637 atomic_inc(&mp->stats.no_free_exch_xid);
638 mempool_free(ep, mp->ep_pool);
639 return NULL;
640}
Vasu Dev52ff8782009-07-29 17:05:10 -0700641
642/**
643 * fc_exch_alloc() - allocate an exchange.
644 * @lport: ptr to the local port
645 * @fp: ptr to the FC frame
646 *
647 * This function walks the list of the exchange manager(EM)
648 * anchors to select a EM for new exchange allocation. The
649 * EM is selected having either a NULL match function pointer
650 * or call to match function returning true.
651 */
Robert Love1a7b75a2009-11-03 11:45:47 -0800652static struct fc_exch *fc_exch_alloc(struct fc_lport *lport,
653 struct fc_frame *fp)
Vasu Dev52ff8782009-07-29 17:05:10 -0700654{
655 struct fc_exch_mgr_anchor *ema;
656 struct fc_exch *ep;
657
658 list_for_each_entry(ema, &lport->ema_list, ema_list) {
659 if (!ema->match || ema->match(fp)) {
Vasu Devd7179682009-07-29 17:05:21 -0700660 ep = fc_exch_em_alloc(lport, ema->mp);
Vasu Dev52ff8782009-07-29 17:05:10 -0700661 if (ep)
662 return ep;
663 }
664 }
665 return NULL;
666}
Robert Love42e9a922008-12-09 15:10:17 -0800667
668/*
669 * Lookup and hold an exchange.
670 */
671static struct fc_exch *fc_exch_find(struct fc_exch_mgr *mp, u16 xid)
672{
Vasu Devb2f00912009-08-25 13:58:53 -0700673 struct fc_exch_pool *pool;
Robert Love42e9a922008-12-09 15:10:17 -0800674 struct fc_exch *ep = NULL;
675
676 if ((xid >= mp->min_xid) && (xid <= mp->max_xid)) {
Vasu Devb2f00912009-08-25 13:58:53 -0700677 pool = per_cpu_ptr(mp->pool, xid & fc_cpu_mask);
678 spin_lock_bh(&pool->lock);
679 ep = fc_exch_ptr_get(pool, (xid - mp->min_xid) >> fc_cpu_order);
Robert Love42e9a922008-12-09 15:10:17 -0800680 if (ep) {
681 fc_exch_hold(ep);
682 WARN_ON(ep->xid != xid);
683 }
Vasu Devb2f00912009-08-25 13:58:53 -0700684 spin_unlock_bh(&pool->lock);
Robert Love42e9a922008-12-09 15:10:17 -0800685 }
686 return ep;
687}
688
Robert Love1a7b75a2009-11-03 11:45:47 -0800689
690/**
691 * fc_exch_done() - Indicate that an exchange/sequence tuple is complete and
692 * the memory allocated for the related objects may be freed.
693 * @sp: Sequence pointer
694 */
695static void fc_exch_done(struct fc_seq *sp)
Robert Love42e9a922008-12-09 15:10:17 -0800696{
697 struct fc_exch *ep = fc_seq_exch(sp);
698 int rc;
699
700 spin_lock_bh(&ep->ex_lock);
701 rc = fc_exch_done_locked(ep);
702 spin_unlock_bh(&ep->ex_lock);
703 if (!rc)
Vasu Devb2f00912009-08-25 13:58:53 -0700704 fc_exch_delete(ep);
Robert Love42e9a922008-12-09 15:10:17 -0800705}
Robert Love42e9a922008-12-09 15:10:17 -0800706
707/*
708 * Allocate a new exchange as responder.
709 * Sets the responder ID in the frame header.
710 */
Vasu Dev52ff8782009-07-29 17:05:10 -0700711static struct fc_exch *fc_exch_resp(struct fc_lport *lport,
712 struct fc_exch_mgr *mp,
713 struct fc_frame *fp)
Robert Love42e9a922008-12-09 15:10:17 -0800714{
715 struct fc_exch *ep;
716 struct fc_frame_header *fh;
Robert Love42e9a922008-12-09 15:10:17 -0800717
Vasu Dev52ff8782009-07-29 17:05:10 -0700718 ep = fc_exch_alloc(lport, fp);
Robert Love42e9a922008-12-09 15:10:17 -0800719 if (ep) {
720 ep->class = fc_frame_class(fp);
721
722 /*
723 * Set EX_CTX indicating we're responding on this exchange.
724 */
725 ep->f_ctl |= FC_FC_EX_CTX; /* we're responding */
726 ep->f_ctl &= ~FC_FC_FIRST_SEQ; /* not new */
727 fh = fc_frame_header_get(fp);
728 ep->sid = ntoh24(fh->fh_d_id);
729 ep->did = ntoh24(fh->fh_s_id);
730 ep->oid = ep->did;
731
732 /*
733 * Allocated exchange has placed the XID in the
734 * originator field. Move it to the responder field,
735 * and set the originator XID from the frame.
736 */
737 ep->rxid = ep->xid;
738 ep->oxid = ntohs(fh->fh_ox_id);
739 ep->esb_stat |= ESB_ST_RESP | ESB_ST_SEQ_INIT;
740 if ((ntoh24(fh->fh_f_ctl) & FC_FC_SEQ_INIT) == 0)
741 ep->esb_stat &= ~ESB_ST_SEQ_INIT;
742
Robert Love42e9a922008-12-09 15:10:17 -0800743 fc_exch_hold(ep); /* hold for caller */
Vasu Dev52ff8782009-07-29 17:05:10 -0700744 spin_unlock_bh(&ep->ex_lock); /* lock from fc_exch_alloc */
Robert Love42e9a922008-12-09 15:10:17 -0800745 }
746 return ep;
747}
748
749/*
750 * Find a sequence for receive where the other end is originating the sequence.
751 * If fc_pf_rjt_reason is FC_RJT_NONE then this function will have a hold
752 * on the ep that should be released by the caller.
753 */
Vasu Dev52ff8782009-07-29 17:05:10 -0700754static enum fc_pf_rjt_reason fc_seq_lookup_recip(struct fc_lport *lport,
755 struct fc_exch_mgr *mp,
Robert Loveb2ab99c2009-02-27 10:55:50 -0800756 struct fc_frame *fp)
Robert Love42e9a922008-12-09 15:10:17 -0800757{
758 struct fc_frame_header *fh = fc_frame_header_get(fp);
759 struct fc_exch *ep = NULL;
760 struct fc_seq *sp = NULL;
761 enum fc_pf_rjt_reason reject = FC_RJT_NONE;
762 u32 f_ctl;
763 u16 xid;
764
765 f_ctl = ntoh24(fh->fh_f_ctl);
766 WARN_ON((f_ctl & FC_FC_SEQ_CTX) != 0);
767
768 /*
769 * Lookup or create the exchange if we will be creating the sequence.
770 */
771 if (f_ctl & FC_FC_EX_CTX) {
772 xid = ntohs(fh->fh_ox_id); /* we originated exch */
773 ep = fc_exch_find(mp, xid);
774 if (!ep) {
775 atomic_inc(&mp->stats.xid_not_found);
776 reject = FC_RJT_OX_ID;
777 goto out;
778 }
779 if (ep->rxid == FC_XID_UNKNOWN)
780 ep->rxid = ntohs(fh->fh_rx_id);
781 else if (ep->rxid != ntohs(fh->fh_rx_id)) {
782 reject = FC_RJT_OX_ID;
783 goto rel;
784 }
785 } else {
786 xid = ntohs(fh->fh_rx_id); /* we are the responder */
787
788 /*
789 * Special case for MDS issuing an ELS TEST with a
790 * bad rxid of 0.
791 * XXX take this out once we do the proper reject.
792 */
793 if (xid == 0 && fh->fh_r_ctl == FC_RCTL_ELS_REQ &&
794 fc_frame_payload_op(fp) == ELS_TEST) {
795 fh->fh_rx_id = htons(FC_XID_UNKNOWN);
796 xid = FC_XID_UNKNOWN;
797 }
798
799 /*
800 * new sequence - find the exchange
801 */
802 ep = fc_exch_find(mp, xid);
803 if ((f_ctl & FC_FC_FIRST_SEQ) && fc_sof_is_init(fr_sof(fp))) {
804 if (ep) {
805 atomic_inc(&mp->stats.xid_busy);
806 reject = FC_RJT_RX_ID;
807 goto rel;
808 }
Vasu Dev52ff8782009-07-29 17:05:10 -0700809 ep = fc_exch_resp(lport, mp, fp);
Robert Love42e9a922008-12-09 15:10:17 -0800810 if (!ep) {
811 reject = FC_RJT_EXCH_EST; /* XXX */
812 goto out;
813 }
814 xid = ep->xid; /* get our XID */
815 } else if (!ep) {
816 atomic_inc(&mp->stats.xid_not_found);
817 reject = FC_RJT_RX_ID; /* XID not found */
818 goto out;
819 }
820 }
821
822 /*
823 * At this point, we have the exchange held.
824 * Find or create the sequence.
825 */
826 if (fc_sof_is_init(fr_sof(fp))) {
827 sp = fc_seq_start_next(&ep->seq);
828 if (!sp) {
829 reject = FC_RJT_SEQ_XS; /* exchange shortage */
830 goto rel;
831 }
832 sp->id = fh->fh_seq_id;
833 sp->ssb_stat |= SSB_ST_RESP;
834 } else {
835 sp = &ep->seq;
836 if (sp->id != fh->fh_seq_id) {
837 atomic_inc(&mp->stats.seq_not_found);
838 reject = FC_RJT_SEQ_ID; /* sequence/exch should exist */
839 goto rel;
840 }
841 }
842 WARN_ON(ep != fc_seq_exch(sp));
843
844 if (f_ctl & FC_FC_SEQ_INIT)
845 ep->esb_stat |= ESB_ST_SEQ_INIT;
846
847 fr_seq(fp) = sp;
848out:
849 return reject;
850rel:
851 fc_exch_done(&ep->seq);
852 fc_exch_release(ep); /* hold from fc_exch_find/fc_exch_resp */
853 return reject;
854}
855
856/*
857 * Find the sequence for a frame being received.
858 * We originated the sequence, so it should be found.
859 * We may or may not have originated the exchange.
860 * Does not hold the sequence for the caller.
861 */
862static struct fc_seq *fc_seq_lookup_orig(struct fc_exch_mgr *mp,
863 struct fc_frame *fp)
864{
865 struct fc_frame_header *fh = fc_frame_header_get(fp);
866 struct fc_exch *ep;
867 struct fc_seq *sp = NULL;
868 u32 f_ctl;
869 u16 xid;
870
871 f_ctl = ntoh24(fh->fh_f_ctl);
872 WARN_ON((f_ctl & FC_FC_SEQ_CTX) != FC_FC_SEQ_CTX);
873 xid = ntohs((f_ctl & FC_FC_EX_CTX) ? fh->fh_ox_id : fh->fh_rx_id);
874 ep = fc_exch_find(mp, xid);
875 if (!ep)
876 return NULL;
877 if (ep->seq.id == fh->fh_seq_id) {
878 /*
879 * Save the RX_ID if we didn't previously know it.
880 */
881 sp = &ep->seq;
882 if ((f_ctl & FC_FC_EX_CTX) != 0 &&
883 ep->rxid == FC_XID_UNKNOWN) {
884 ep->rxid = ntohs(fh->fh_rx_id);
885 }
886 }
887 fc_exch_release(ep);
888 return sp;
889}
890
891/*
892 * Set addresses for an exchange.
893 * Note this must be done before the first sequence of the exchange is sent.
894 */
895static void fc_exch_set_addr(struct fc_exch *ep,
896 u32 orig_id, u32 resp_id)
897{
898 ep->oid = orig_id;
899 if (ep->esb_stat & ESB_ST_RESP) {
900 ep->sid = resp_id;
901 ep->did = orig_id;
902 } else {
903 ep->sid = orig_id;
904 ep->did = resp_id;
905 }
906}
907
Robert Love1a7b75a2009-11-03 11:45:47 -0800908/**
909 * fc_seq_els_rsp_send() - Send ELS response using mainly infomation
910 * in exchange and sequence in EM layer.
911 * @sp: Sequence pointer
912 * @els_cmd: ELS command
913 * @els_data: ELS data
Robert Love42e9a922008-12-09 15:10:17 -0800914 */
Robert Love1a7b75a2009-11-03 11:45:47 -0800915static void fc_seq_els_rsp_send(struct fc_seq *sp, enum fc_els_cmd els_cmd,
916 struct fc_seq_els_data *els_data)
Robert Love42e9a922008-12-09 15:10:17 -0800917{
918 switch (els_cmd) {
919 case ELS_LS_RJT:
920 fc_seq_ls_rjt(sp, els_data->reason, els_data->explan);
921 break;
922 case ELS_LS_ACC:
923 fc_seq_ls_acc(sp);
924 break;
925 case ELS_RRQ:
926 fc_exch_els_rrq(sp, els_data->fp);
927 break;
928 case ELS_REC:
929 fc_exch_els_rec(sp, els_data->fp);
930 break;
931 default:
Robert Love74147052009-06-10 15:31:10 -0700932 FC_EXCH_DBG(fc_seq_exch(sp), "Invalid ELS CMD:%x\n", els_cmd);
Robert Love42e9a922008-12-09 15:10:17 -0800933 }
934}
Robert Love42e9a922008-12-09 15:10:17 -0800935
936/*
937 * Send a sequence, which is also the last sequence in the exchange.
938 */
939static void fc_seq_send_last(struct fc_seq *sp, struct fc_frame *fp,
940 enum fc_rctl rctl, enum fc_fh_type fh_type)
941{
942 u32 f_ctl;
943 struct fc_exch *ep = fc_seq_exch(sp);
944
945 f_ctl = FC_FC_LAST_SEQ | FC_FC_END_SEQ | FC_FC_SEQ_INIT;
946 f_ctl |= ep->f_ctl;
947 fc_fill_fc_hdr(fp, rctl, ep->did, ep->sid, fh_type, f_ctl, 0);
948 fc_seq_send(ep->lp, sp, fp);
949}
950
951/*
952 * Send ACK_1 (or equiv.) indicating we received something.
953 * The frame we're acking is supplied.
954 */
955static void fc_seq_send_ack(struct fc_seq *sp, const struct fc_frame *rx_fp)
956{
957 struct fc_frame *fp;
958 struct fc_frame_header *rx_fh;
959 struct fc_frame_header *fh;
960 struct fc_exch *ep = fc_seq_exch(sp);
961 struct fc_lport *lp = ep->lp;
962 unsigned int f_ctl;
963
964 /*
965 * Don't send ACKs for class 3.
966 */
967 if (fc_sof_needs_ack(fr_sof(rx_fp))) {
968 fp = fc_frame_alloc(lp, 0);
969 if (!fp)
970 return;
971
972 fh = fc_frame_header_get(fp);
973 fh->fh_r_ctl = FC_RCTL_ACK_1;
974 fh->fh_type = FC_TYPE_BLS;
975
976 /*
977 * Form f_ctl by inverting EX_CTX and SEQ_CTX (bits 23, 22).
978 * Echo FIRST_SEQ, LAST_SEQ, END_SEQ, END_CONN, SEQ_INIT.
979 * Bits 9-8 are meaningful (retransmitted or unidirectional).
980 * Last ACK uses bits 7-6 (continue sequence),
981 * bits 5-4 are meaningful (what kind of ACK to use).
982 */
983 rx_fh = fc_frame_header_get(rx_fp);
984 f_ctl = ntoh24(rx_fh->fh_f_ctl);
985 f_ctl &= FC_FC_EX_CTX | FC_FC_SEQ_CTX |
986 FC_FC_FIRST_SEQ | FC_FC_LAST_SEQ |
987 FC_FC_END_SEQ | FC_FC_END_CONN | FC_FC_SEQ_INIT |
988 FC_FC_RETX_SEQ | FC_FC_UNI_TX;
989 f_ctl ^= FC_FC_EX_CTX | FC_FC_SEQ_CTX;
990 hton24(fh->fh_f_ctl, f_ctl);
991
992 fc_exch_setup_hdr(ep, fp, f_ctl);
993 fh->fh_seq_id = rx_fh->fh_seq_id;
994 fh->fh_seq_cnt = rx_fh->fh_seq_cnt;
995 fh->fh_parm_offset = htonl(1); /* ack single frame */
996
997 fr_sof(fp) = fr_sof(rx_fp);
998 if (f_ctl & FC_FC_END_SEQ)
999 fr_eof(fp) = FC_EOF_T;
1000 else
1001 fr_eof(fp) = FC_EOF_N;
1002
1003 (void) lp->tt.frame_send(lp, fp);
1004 }
1005}
1006
1007/*
1008 * Send BLS Reject.
1009 * This is for rejecting BA_ABTS only.
1010 */
Robert Loveb2ab99c2009-02-27 10:55:50 -08001011static void fc_exch_send_ba_rjt(struct fc_frame *rx_fp,
1012 enum fc_ba_rjt_reason reason,
1013 enum fc_ba_rjt_explan explan)
Robert Love42e9a922008-12-09 15:10:17 -08001014{
1015 struct fc_frame *fp;
1016 struct fc_frame_header *rx_fh;
1017 struct fc_frame_header *fh;
1018 struct fc_ba_rjt *rp;
1019 struct fc_lport *lp;
1020 unsigned int f_ctl;
1021
1022 lp = fr_dev(rx_fp);
1023 fp = fc_frame_alloc(lp, sizeof(*rp));
1024 if (!fp)
1025 return;
1026 fh = fc_frame_header_get(fp);
1027 rx_fh = fc_frame_header_get(rx_fp);
1028
1029 memset(fh, 0, sizeof(*fh) + sizeof(*rp));
1030
1031 rp = fc_frame_payload_get(fp, sizeof(*rp));
1032 rp->br_reason = reason;
1033 rp->br_explan = explan;
1034
1035 /*
1036 * seq_id, cs_ctl, df_ctl and param/offset are zero.
1037 */
1038 memcpy(fh->fh_s_id, rx_fh->fh_d_id, 3);
1039 memcpy(fh->fh_d_id, rx_fh->fh_s_id, 3);
Joe Eykholt1d490ce2009-08-25 14:04:03 -07001040 fh->fh_ox_id = rx_fh->fh_ox_id;
1041 fh->fh_rx_id = rx_fh->fh_rx_id;
Robert Love42e9a922008-12-09 15:10:17 -08001042 fh->fh_seq_cnt = rx_fh->fh_seq_cnt;
1043 fh->fh_r_ctl = FC_RCTL_BA_RJT;
1044 fh->fh_type = FC_TYPE_BLS;
1045
1046 /*
1047 * Form f_ctl by inverting EX_CTX and SEQ_CTX (bits 23, 22).
1048 * Echo FIRST_SEQ, LAST_SEQ, END_SEQ, END_CONN, SEQ_INIT.
1049 * Bits 9-8 are meaningful (retransmitted or unidirectional).
1050 * Last ACK uses bits 7-6 (continue sequence),
1051 * bits 5-4 are meaningful (what kind of ACK to use).
1052 * Always set LAST_SEQ, END_SEQ.
1053 */
1054 f_ctl = ntoh24(rx_fh->fh_f_ctl);
1055 f_ctl &= FC_FC_EX_CTX | FC_FC_SEQ_CTX |
1056 FC_FC_END_CONN | FC_FC_SEQ_INIT |
1057 FC_FC_RETX_SEQ | FC_FC_UNI_TX;
1058 f_ctl ^= FC_FC_EX_CTX | FC_FC_SEQ_CTX;
1059 f_ctl |= FC_FC_LAST_SEQ | FC_FC_END_SEQ;
1060 f_ctl &= ~FC_FC_FIRST_SEQ;
1061 hton24(fh->fh_f_ctl, f_ctl);
1062
1063 fr_sof(fp) = fc_sof_class(fr_sof(rx_fp));
1064 fr_eof(fp) = FC_EOF_T;
1065 if (fc_sof_needs_ack(fr_sof(fp)))
1066 fr_eof(fp) = FC_EOF_N;
1067
1068 (void) lp->tt.frame_send(lp, fp);
1069}
1070
1071/*
1072 * Handle an incoming ABTS. This would be for target mode usually,
1073 * but could be due to lost FCP transfer ready, confirm or RRQ.
1074 * We always handle this as an exchange abort, ignoring the parameter.
1075 */
1076static void fc_exch_recv_abts(struct fc_exch *ep, struct fc_frame *rx_fp)
1077{
1078 struct fc_frame *fp;
1079 struct fc_ba_acc *ap;
1080 struct fc_frame_header *fh;
1081 struct fc_seq *sp;
1082
1083 if (!ep)
1084 goto reject;
1085 spin_lock_bh(&ep->ex_lock);
1086 if (ep->esb_stat & ESB_ST_COMPLETE) {
1087 spin_unlock_bh(&ep->ex_lock);
1088 goto reject;
1089 }
1090 if (!(ep->esb_stat & ESB_ST_REC_QUAL))
1091 fc_exch_hold(ep); /* hold for REC_QUAL */
1092 ep->esb_stat |= ESB_ST_ABNORMAL | ESB_ST_REC_QUAL;
1093 fc_exch_timer_set_locked(ep, ep->r_a_tov);
1094
1095 fp = fc_frame_alloc(ep->lp, sizeof(*ap));
1096 if (!fp) {
1097 spin_unlock_bh(&ep->ex_lock);
1098 goto free;
1099 }
1100 fh = fc_frame_header_get(fp);
1101 ap = fc_frame_payload_get(fp, sizeof(*ap));
1102 memset(ap, 0, sizeof(*ap));
1103 sp = &ep->seq;
1104 ap->ba_high_seq_cnt = htons(0xffff);
1105 if (sp->ssb_stat & SSB_ST_RESP) {
1106 ap->ba_seq_id = sp->id;
1107 ap->ba_seq_id_val = FC_BA_SEQ_ID_VAL;
1108 ap->ba_high_seq_cnt = fh->fh_seq_cnt;
1109 ap->ba_low_seq_cnt = htons(sp->cnt);
1110 }
Vasu Deva7e84f22009-02-27 10:54:51 -08001111 sp = fc_seq_start_next_locked(sp);
Robert Love42e9a922008-12-09 15:10:17 -08001112 spin_unlock_bh(&ep->ex_lock);
1113 fc_seq_send_last(sp, fp, FC_RCTL_BA_ACC, FC_TYPE_BLS);
1114 fc_frame_free(rx_fp);
1115 return;
1116
1117reject:
1118 fc_exch_send_ba_rjt(rx_fp, FC_BA_RJT_UNABLE, FC_BA_RJT_INV_XID);
1119free:
1120 fc_frame_free(rx_fp);
1121}
1122
1123/*
1124 * Handle receive where the other end is originating the sequence.
1125 */
1126static void fc_exch_recv_req(struct fc_lport *lp, struct fc_exch_mgr *mp,
1127 struct fc_frame *fp)
1128{
1129 struct fc_frame_header *fh = fc_frame_header_get(fp);
1130 struct fc_seq *sp = NULL;
1131 struct fc_exch *ep = NULL;
1132 enum fc_sof sof;
1133 enum fc_eof eof;
1134 u32 f_ctl;
1135 enum fc_pf_rjt_reason reject;
1136
Chris Leech174e1eb2009-11-03 11:46:14 -08001137 /* We can have the wrong fc_lport at this point with NPIV, which is a
1138 * problem now that we know a new exchange needs to be allocated
1139 */
1140 lp = fc_vport_id_lookup(lp, ntoh24(fh->fh_d_id));
1141 if (!lp) {
1142 fc_frame_free(fp);
1143 return;
1144 }
1145
Robert Love42e9a922008-12-09 15:10:17 -08001146 fr_seq(fp) = NULL;
Vasu Dev52ff8782009-07-29 17:05:10 -07001147 reject = fc_seq_lookup_recip(lp, mp, fp);
Robert Love42e9a922008-12-09 15:10:17 -08001148 if (reject == FC_RJT_NONE) {
1149 sp = fr_seq(fp); /* sequence will be held */
1150 ep = fc_seq_exch(sp);
1151 sof = fr_sof(fp);
1152 eof = fr_eof(fp);
1153 f_ctl = ntoh24(fh->fh_f_ctl);
1154 fc_seq_send_ack(sp, fp);
1155
1156 /*
1157 * Call the receive function.
1158 *
1159 * The receive function may allocate a new sequence
1160 * over the old one, so we shouldn't change the
1161 * sequence after this.
1162 *
1163 * The frame will be freed by the receive function.
1164 * If new exch resp handler is valid then call that
1165 * first.
1166 */
1167 if (ep->resp)
1168 ep->resp(sp, fp, ep->arg);
1169 else
1170 lp->tt.lport_recv(lp, sp, fp);
1171 fc_exch_release(ep); /* release from lookup */
1172 } else {
Robert Loved459b7e2009-07-29 17:05:05 -07001173 FC_LPORT_DBG(lp, "exch/seq lookup failed: reject %x\n", reject);
Robert Love42e9a922008-12-09 15:10:17 -08001174 fc_frame_free(fp);
1175 }
1176}
1177
1178/*
1179 * Handle receive where the other end is originating the sequence in
1180 * response to our exchange.
1181 */
1182static void fc_exch_recv_seq_resp(struct fc_exch_mgr *mp, struct fc_frame *fp)
1183{
1184 struct fc_frame_header *fh = fc_frame_header_get(fp);
1185 struct fc_seq *sp;
1186 struct fc_exch *ep;
1187 enum fc_sof sof;
1188 u32 f_ctl;
1189 void (*resp)(struct fc_seq *, struct fc_frame *fp, void *arg);
1190 void *ex_resp_arg;
1191 int rc;
1192
1193 ep = fc_exch_find(mp, ntohs(fh->fh_ox_id));
1194 if (!ep) {
1195 atomic_inc(&mp->stats.xid_not_found);
1196 goto out;
1197 }
Steve Ma30121d12009-05-06 10:52:29 -07001198 if (ep->esb_stat & ESB_ST_COMPLETE) {
1199 atomic_inc(&mp->stats.xid_not_found);
1200 goto out;
1201 }
Robert Love42e9a922008-12-09 15:10:17 -08001202 if (ep->rxid == FC_XID_UNKNOWN)
1203 ep->rxid = ntohs(fh->fh_rx_id);
1204 if (ep->sid != 0 && ep->sid != ntoh24(fh->fh_d_id)) {
1205 atomic_inc(&mp->stats.xid_not_found);
1206 goto rel;
1207 }
1208 if (ep->did != ntoh24(fh->fh_s_id) &&
1209 ep->did != FC_FID_FLOGI) {
1210 atomic_inc(&mp->stats.xid_not_found);
1211 goto rel;
1212 }
1213 sof = fr_sof(fp);
1214 if (fc_sof_is_init(sof)) {
1215 sp = fc_seq_start_next(&ep->seq);
1216 sp->id = fh->fh_seq_id;
1217 sp->ssb_stat |= SSB_ST_RESP;
1218 } else {
1219 sp = &ep->seq;
1220 if (sp->id != fh->fh_seq_id) {
1221 atomic_inc(&mp->stats.seq_not_found);
1222 goto rel;
1223 }
1224 }
1225 f_ctl = ntoh24(fh->fh_f_ctl);
1226 fr_seq(fp) = sp;
1227 if (f_ctl & FC_FC_SEQ_INIT)
1228 ep->esb_stat |= ESB_ST_SEQ_INIT;
1229
1230 if (fc_sof_needs_ack(sof))
1231 fc_seq_send_ack(sp, fp);
1232 resp = ep->resp;
1233 ex_resp_arg = ep->arg;
1234
1235 if (fh->fh_type != FC_TYPE_FCP && fr_eof(fp) == FC_EOF_T &&
1236 (f_ctl & (FC_FC_LAST_SEQ | FC_FC_END_SEQ)) ==
1237 (FC_FC_LAST_SEQ | FC_FC_END_SEQ)) {
1238 spin_lock_bh(&ep->ex_lock);
1239 rc = fc_exch_done_locked(ep);
1240 WARN_ON(fc_seq_exch(sp) != ep);
1241 spin_unlock_bh(&ep->ex_lock);
1242 if (!rc)
Vasu Devb2f00912009-08-25 13:58:53 -07001243 fc_exch_delete(ep);
Robert Love42e9a922008-12-09 15:10:17 -08001244 }
1245
1246 /*
1247 * Call the receive function.
1248 * The sequence is held (has a refcnt) for us,
1249 * but not for the receive function.
1250 *
1251 * The receive function may allocate a new sequence
1252 * over the old one, so we shouldn't change the
1253 * sequence after this.
1254 *
1255 * The frame will be freed by the receive function.
1256 * If new exch resp handler is valid then call that
1257 * first.
1258 */
1259 if (resp)
1260 resp(sp, fp, ex_resp_arg);
1261 else
1262 fc_frame_free(fp);
1263 fc_exch_release(ep);
1264 return;
1265rel:
1266 fc_exch_release(ep);
1267out:
1268 fc_frame_free(fp);
1269}
1270
1271/*
1272 * Handle receive for a sequence where other end is responding to our sequence.
1273 */
1274static void fc_exch_recv_resp(struct fc_exch_mgr *mp, struct fc_frame *fp)
1275{
1276 struct fc_seq *sp;
1277
1278 sp = fc_seq_lookup_orig(mp, fp); /* doesn't hold sequence */
Robert Loved459b7e2009-07-29 17:05:05 -07001279
1280 if (!sp)
Robert Love42e9a922008-12-09 15:10:17 -08001281 atomic_inc(&mp->stats.xid_not_found);
Robert Loved459b7e2009-07-29 17:05:05 -07001282 else
Robert Love42e9a922008-12-09 15:10:17 -08001283 atomic_inc(&mp->stats.non_bls_resp);
Robert Loved459b7e2009-07-29 17:05:05 -07001284
Robert Love42e9a922008-12-09 15:10:17 -08001285 fc_frame_free(fp);
1286}
1287
1288/*
1289 * Handle the response to an ABTS for exchange or sequence.
1290 * This can be BA_ACC or BA_RJT.
1291 */
1292static void fc_exch_abts_resp(struct fc_exch *ep, struct fc_frame *fp)
1293{
1294 void (*resp)(struct fc_seq *, struct fc_frame *fp, void *arg);
1295 void *ex_resp_arg;
1296 struct fc_frame_header *fh;
1297 struct fc_ba_acc *ap;
1298 struct fc_seq *sp;
1299 u16 low;
1300 u16 high;
1301 int rc = 1, has_rec = 0;
1302
1303 fh = fc_frame_header_get(fp);
Robert Love74147052009-06-10 15:31:10 -07001304 FC_EXCH_DBG(ep, "exch: BLS rctl %x - %s\n", fh->fh_r_ctl,
1305 fc_exch_rctl_name(fh->fh_r_ctl));
Robert Love42e9a922008-12-09 15:10:17 -08001306
1307 if (cancel_delayed_work_sync(&ep->timeout_work))
1308 fc_exch_release(ep); /* release from pending timer hold */
1309
1310 spin_lock_bh(&ep->ex_lock);
1311 switch (fh->fh_r_ctl) {
1312 case FC_RCTL_BA_ACC:
1313 ap = fc_frame_payload_get(fp, sizeof(*ap));
1314 if (!ap)
1315 break;
1316
1317 /*
1318 * Decide whether to establish a Recovery Qualifier.
1319 * We do this if there is a non-empty SEQ_CNT range and
1320 * SEQ_ID is the same as the one we aborted.
1321 */
1322 low = ntohs(ap->ba_low_seq_cnt);
1323 high = ntohs(ap->ba_high_seq_cnt);
1324 if ((ep->esb_stat & ESB_ST_REC_QUAL) == 0 &&
1325 (ap->ba_seq_id_val != FC_BA_SEQ_ID_VAL ||
1326 ap->ba_seq_id == ep->seq_id) && low != high) {
1327 ep->esb_stat |= ESB_ST_REC_QUAL;
1328 fc_exch_hold(ep); /* hold for recovery qualifier */
1329 has_rec = 1;
1330 }
1331 break;
1332 case FC_RCTL_BA_RJT:
1333 break;
1334 default:
1335 break;
1336 }
1337
1338 resp = ep->resp;
1339 ex_resp_arg = ep->arg;
1340
1341 /* do we need to do some other checks here. Can we reuse more of
1342 * fc_exch_recv_seq_resp
1343 */
1344 sp = &ep->seq;
1345 /*
1346 * do we want to check END_SEQ as well as LAST_SEQ here?
1347 */
1348 if (ep->fh_type != FC_TYPE_FCP &&
1349 ntoh24(fh->fh_f_ctl) & FC_FC_LAST_SEQ)
1350 rc = fc_exch_done_locked(ep);
1351 spin_unlock_bh(&ep->ex_lock);
1352 if (!rc)
Vasu Devb2f00912009-08-25 13:58:53 -07001353 fc_exch_delete(ep);
Robert Love42e9a922008-12-09 15:10:17 -08001354
1355 if (resp)
1356 resp(sp, fp, ex_resp_arg);
1357 else
1358 fc_frame_free(fp);
1359
1360 if (has_rec)
1361 fc_exch_timer_set(ep, ep->r_a_tov);
1362
1363}
1364
1365/*
1366 * Receive BLS sequence.
1367 * This is always a sequence initiated by the remote side.
1368 * We may be either the originator or recipient of the exchange.
1369 */
1370static void fc_exch_recv_bls(struct fc_exch_mgr *mp, struct fc_frame *fp)
1371{
1372 struct fc_frame_header *fh;
1373 struct fc_exch *ep;
1374 u32 f_ctl;
1375
1376 fh = fc_frame_header_get(fp);
1377 f_ctl = ntoh24(fh->fh_f_ctl);
1378 fr_seq(fp) = NULL;
1379
1380 ep = fc_exch_find(mp, (f_ctl & FC_FC_EX_CTX) ?
1381 ntohs(fh->fh_ox_id) : ntohs(fh->fh_rx_id));
1382 if (ep && (f_ctl & FC_FC_SEQ_INIT)) {
1383 spin_lock_bh(&ep->ex_lock);
1384 ep->esb_stat |= ESB_ST_SEQ_INIT;
1385 spin_unlock_bh(&ep->ex_lock);
1386 }
1387 if (f_ctl & FC_FC_SEQ_CTX) {
1388 /*
1389 * A response to a sequence we initiated.
1390 * This should only be ACKs for class 2 or F.
1391 */
1392 switch (fh->fh_r_ctl) {
1393 case FC_RCTL_ACK_1:
1394 case FC_RCTL_ACK_0:
1395 break;
1396 default:
Robert Love74147052009-06-10 15:31:10 -07001397 FC_EXCH_DBG(ep, "BLS rctl %x - %s received",
1398 fh->fh_r_ctl,
1399 fc_exch_rctl_name(fh->fh_r_ctl));
Robert Love42e9a922008-12-09 15:10:17 -08001400 break;
1401 }
1402 fc_frame_free(fp);
1403 } else {
1404 switch (fh->fh_r_ctl) {
1405 case FC_RCTL_BA_RJT:
1406 case FC_RCTL_BA_ACC:
1407 if (ep)
1408 fc_exch_abts_resp(ep, fp);
1409 else
1410 fc_frame_free(fp);
1411 break;
1412 case FC_RCTL_BA_ABTS:
1413 fc_exch_recv_abts(ep, fp);
1414 break;
1415 default: /* ignore junk */
1416 fc_frame_free(fp);
1417 break;
1418 }
1419 }
1420 if (ep)
1421 fc_exch_release(ep); /* release hold taken by fc_exch_find */
1422}
1423
1424/*
1425 * Accept sequence with LS_ACC.
1426 * If this fails due to allocation or transmit congestion, assume the
1427 * originator will repeat the sequence.
1428 */
1429static void fc_seq_ls_acc(struct fc_seq *req_sp)
1430{
1431 struct fc_seq *sp;
1432 struct fc_els_ls_acc *acc;
1433 struct fc_frame *fp;
1434
1435 sp = fc_seq_start_next(req_sp);
1436 fp = fc_frame_alloc(fc_seq_exch(sp)->lp, sizeof(*acc));
1437 if (fp) {
1438 acc = fc_frame_payload_get(fp, sizeof(*acc));
1439 memset(acc, 0, sizeof(*acc));
1440 acc->la_cmd = ELS_LS_ACC;
1441 fc_seq_send_last(sp, fp, FC_RCTL_ELS_REP, FC_TYPE_ELS);
1442 }
1443}
1444
1445/*
1446 * Reject sequence with ELS LS_RJT.
1447 * If this fails due to allocation or transmit congestion, assume the
1448 * originator will repeat the sequence.
1449 */
1450static void fc_seq_ls_rjt(struct fc_seq *req_sp, enum fc_els_rjt_reason reason,
1451 enum fc_els_rjt_explan explan)
1452{
1453 struct fc_seq *sp;
1454 struct fc_els_ls_rjt *rjt;
1455 struct fc_frame *fp;
1456
1457 sp = fc_seq_start_next(req_sp);
1458 fp = fc_frame_alloc(fc_seq_exch(sp)->lp, sizeof(*rjt));
1459 if (fp) {
1460 rjt = fc_frame_payload_get(fp, sizeof(*rjt));
1461 memset(rjt, 0, sizeof(*rjt));
1462 rjt->er_cmd = ELS_LS_RJT;
1463 rjt->er_reason = reason;
1464 rjt->er_explan = explan;
1465 fc_seq_send_last(sp, fp, FC_RCTL_ELS_REP, FC_TYPE_ELS);
1466 }
1467}
1468
1469static void fc_exch_reset(struct fc_exch *ep)
1470{
1471 struct fc_seq *sp;
1472 void (*resp)(struct fc_seq *, struct fc_frame *, void *);
1473 void *arg;
1474 int rc = 1;
1475
1476 spin_lock_bh(&ep->ex_lock);
1477 ep->state |= FC_EX_RST_CLEANUP;
1478 /*
1479 * we really want to call del_timer_sync, but cannot due
1480 * to the lport calling with the lport lock held (some resp
1481 * functions can also grab the lport lock which could cause
1482 * a deadlock).
1483 */
1484 if (cancel_delayed_work(&ep->timeout_work))
1485 atomic_dec(&ep->ex_refcnt); /* drop hold for timer */
1486 resp = ep->resp;
1487 ep->resp = NULL;
1488 if (ep->esb_stat & ESB_ST_REC_QUAL)
1489 atomic_dec(&ep->ex_refcnt); /* drop hold for rec_qual */
1490 ep->esb_stat &= ~ESB_ST_REC_QUAL;
1491 arg = ep->arg;
1492 sp = &ep->seq;
1493 rc = fc_exch_done_locked(ep);
1494 spin_unlock_bh(&ep->ex_lock);
1495 if (!rc)
Vasu Devb2f00912009-08-25 13:58:53 -07001496 fc_exch_delete(ep);
Robert Love42e9a922008-12-09 15:10:17 -08001497
1498 if (resp)
1499 resp(sp, ERR_PTR(-FC_EX_CLOSED), arg);
1500}
1501
Vasu Devb2f00912009-08-25 13:58:53 -07001502/**
1503 * fc_exch_pool_reset() - Resets an per cpu exches pool.
1504 * @lport: ptr to the local port
1505 * @pool: ptr to the per cpu exches pool
1506 * @sid: source FC ID
1507 * @did: destination FC ID
1508 *
1509 * Resets an per cpu exches pool, releasing its all sequences
1510 * and exchanges. If sid is non-zero, then reset only exchanges
1511 * we sourced from that FID. If did is non-zero, reset only
1512 * exchanges destined to that FID.
Robert Love42e9a922008-12-09 15:10:17 -08001513 */
Vasu Devb2f00912009-08-25 13:58:53 -07001514static void fc_exch_pool_reset(struct fc_lport *lport,
1515 struct fc_exch_pool *pool,
1516 u32 sid, u32 did)
Robert Love42e9a922008-12-09 15:10:17 -08001517{
1518 struct fc_exch *ep;
1519 struct fc_exch *next;
Robert Love42e9a922008-12-09 15:10:17 -08001520
Vasu Devb2f00912009-08-25 13:58:53 -07001521 spin_lock_bh(&pool->lock);
Robert Love42e9a922008-12-09 15:10:17 -08001522restart:
Vasu Devb2f00912009-08-25 13:58:53 -07001523 list_for_each_entry_safe(ep, next, &pool->ex_list, ex_list) {
1524 if ((lport == ep->lp) &&
1525 (sid == 0 || sid == ep->sid) &&
1526 (did == 0 || did == ep->did)) {
1527 fc_exch_hold(ep);
1528 spin_unlock_bh(&pool->lock);
Robert Love42e9a922008-12-09 15:10:17 -08001529
Vasu Devb2f00912009-08-25 13:58:53 -07001530 fc_exch_reset(ep);
Robert Love42e9a922008-12-09 15:10:17 -08001531
Vasu Devb2f00912009-08-25 13:58:53 -07001532 fc_exch_release(ep);
1533 spin_lock_bh(&pool->lock);
Robert Love42e9a922008-12-09 15:10:17 -08001534
Vasu Devb2f00912009-08-25 13:58:53 -07001535 /*
1536 * must restart loop incase while lock
1537 * was down multiple eps were released.
1538 */
1539 goto restart;
Robert Love42e9a922008-12-09 15:10:17 -08001540 }
Vasu Devb2f00912009-08-25 13:58:53 -07001541 }
1542 spin_unlock_bh(&pool->lock);
1543}
1544
1545/**
1546 * fc_exch_mgr_reset() - Resets all EMs of a lport
1547 * @lport: ptr to the local port
1548 * @sid: source FC ID
1549 * @did: destination FC ID
1550 *
1551 * Reset all EMs of a lport, releasing its all sequences and
1552 * exchanges. If sid is non-zero, then reset only exchanges
1553 * we sourced from that FID. If did is non-zero, reset only
1554 * exchanges destined to that FID.
1555 */
1556void fc_exch_mgr_reset(struct fc_lport *lport, u32 sid, u32 did)
1557{
1558 struct fc_exch_mgr_anchor *ema;
1559 unsigned int cpu;
1560
1561 list_for_each_entry(ema, &lport->ema_list, ema_list) {
1562 for_each_possible_cpu(cpu)
1563 fc_exch_pool_reset(lport,
1564 per_cpu_ptr(ema->mp->pool, cpu),
1565 sid, did);
Robert Love42e9a922008-12-09 15:10:17 -08001566 }
Robert Love42e9a922008-12-09 15:10:17 -08001567}
1568EXPORT_SYMBOL(fc_exch_mgr_reset);
1569
1570/*
1571 * Handle incoming ELS REC - Read Exchange Concise.
1572 * Note that the requesting port may be different than the S_ID in the request.
1573 */
1574static void fc_exch_els_rec(struct fc_seq *sp, struct fc_frame *rfp)
1575{
1576 struct fc_frame *fp;
1577 struct fc_exch *ep;
1578 struct fc_exch_mgr *em;
1579 struct fc_els_rec *rp;
1580 struct fc_els_rec_acc *acc;
1581 enum fc_els_rjt_reason reason = ELS_RJT_LOGIC;
1582 enum fc_els_rjt_explan explan;
1583 u32 sid;
1584 u16 rxid;
1585 u16 oxid;
1586
1587 rp = fc_frame_payload_get(rfp, sizeof(*rp));
1588 explan = ELS_EXPL_INV_LEN;
1589 if (!rp)
1590 goto reject;
1591 sid = ntoh24(rp->rec_s_id);
1592 rxid = ntohs(rp->rec_rx_id);
1593 oxid = ntohs(rp->rec_ox_id);
1594
1595 /*
1596 * Currently it's hard to find the local S_ID from the exchange
1597 * manager. This will eventually be fixed, but for now it's easier
1598 * to lookup the subject exchange twice, once as if we were
1599 * the initiator, and then again if we weren't.
1600 */
1601 em = fc_seq_exch(sp)->em;
1602 ep = fc_exch_find(em, oxid);
1603 explan = ELS_EXPL_OXID_RXID;
1604 if (ep && ep->oid == sid) {
1605 if (ep->rxid != FC_XID_UNKNOWN &&
1606 rxid != FC_XID_UNKNOWN &&
1607 ep->rxid != rxid)
1608 goto rel;
1609 } else {
1610 if (ep)
1611 fc_exch_release(ep);
1612 ep = NULL;
1613 if (rxid != FC_XID_UNKNOWN)
1614 ep = fc_exch_find(em, rxid);
1615 if (!ep)
1616 goto reject;
1617 }
1618
1619 fp = fc_frame_alloc(fc_seq_exch(sp)->lp, sizeof(*acc));
1620 if (!fp) {
1621 fc_exch_done(sp);
1622 goto out;
1623 }
1624 sp = fc_seq_start_next(sp);
1625 acc = fc_frame_payload_get(fp, sizeof(*acc));
1626 memset(acc, 0, sizeof(*acc));
1627 acc->reca_cmd = ELS_LS_ACC;
1628 acc->reca_ox_id = rp->rec_ox_id;
1629 memcpy(acc->reca_ofid, rp->rec_s_id, 3);
1630 acc->reca_rx_id = htons(ep->rxid);
1631 if (ep->sid == ep->oid)
1632 hton24(acc->reca_rfid, ep->did);
1633 else
1634 hton24(acc->reca_rfid, ep->sid);
1635 acc->reca_fc4value = htonl(ep->seq.rec_data);
1636 acc->reca_e_stat = htonl(ep->esb_stat & (ESB_ST_RESP |
1637 ESB_ST_SEQ_INIT |
1638 ESB_ST_COMPLETE));
1639 sp = fc_seq_start_next(sp);
1640 fc_seq_send_last(sp, fp, FC_RCTL_ELS_REP, FC_TYPE_ELS);
1641out:
1642 fc_exch_release(ep);
1643 fc_frame_free(rfp);
1644 return;
1645
1646rel:
1647 fc_exch_release(ep);
1648reject:
1649 fc_seq_ls_rjt(sp, reason, explan);
1650 fc_frame_free(rfp);
1651}
1652
1653/*
1654 * Handle response from RRQ.
1655 * Not much to do here, really.
1656 * Should report errors.
1657 *
1658 * TODO: fix error handler.
1659 */
1660static void fc_exch_rrq_resp(struct fc_seq *sp, struct fc_frame *fp, void *arg)
1661{
1662 struct fc_exch *aborted_ep = arg;
1663 unsigned int op;
1664
1665 if (IS_ERR(fp)) {
1666 int err = PTR_ERR(fp);
1667
Vasu Dev78342da2009-02-27 10:54:46 -08001668 if (err == -FC_EX_CLOSED || err == -FC_EX_TIMEOUT)
Robert Love42e9a922008-12-09 15:10:17 -08001669 goto cleanup;
Robert Love74147052009-06-10 15:31:10 -07001670 FC_EXCH_DBG(aborted_ep, "Cannot process RRQ, "
1671 "frame error %d\n", err);
Robert Love42e9a922008-12-09 15:10:17 -08001672 return;
1673 }
1674
1675 op = fc_frame_payload_op(fp);
1676 fc_frame_free(fp);
1677
1678 switch (op) {
1679 case ELS_LS_RJT:
Robert Love74147052009-06-10 15:31:10 -07001680 FC_EXCH_DBG(aborted_ep, "LS_RJT for RRQ");
Robert Love42e9a922008-12-09 15:10:17 -08001681 /* fall through */
1682 case ELS_LS_ACC:
1683 goto cleanup;
1684 default:
Robert Love74147052009-06-10 15:31:10 -07001685 FC_EXCH_DBG(aborted_ep, "unexpected response op %x "
1686 "for RRQ", op);
Robert Love42e9a922008-12-09 15:10:17 -08001687 return;
1688 }
1689
1690cleanup:
1691 fc_exch_done(&aborted_ep->seq);
1692 /* drop hold for rec qual */
1693 fc_exch_release(aborted_ep);
1694}
1695
Robert Love1a7b75a2009-11-03 11:45:47 -08001696
1697/**
1698 * This function is for exch_seq_send function pointer in
1699 * struct libfc_function_template, see comment block on
1700 * exch_seq_send for description of this function.
1701 */
1702static struct fc_seq *fc_exch_seq_send(struct fc_lport *lp,
1703 struct fc_frame *fp,
1704 void (*resp)(struct fc_seq *,
1705 struct fc_frame *fp,
1706 void *arg),
1707 void (*destructor)(struct fc_seq *,
1708 void *),
1709 void *arg, u32 timer_msec)
1710{
1711 struct fc_exch *ep;
1712 struct fc_seq *sp = NULL;
1713 struct fc_frame_header *fh;
1714 int rc = 1;
1715
1716 ep = fc_exch_alloc(lp, fp);
1717 if (!ep) {
1718 fc_frame_free(fp);
1719 return NULL;
1720 }
1721 ep->esb_stat |= ESB_ST_SEQ_INIT;
1722 fh = fc_frame_header_get(fp);
1723 fc_exch_set_addr(ep, ntoh24(fh->fh_s_id), ntoh24(fh->fh_d_id));
1724 ep->resp = resp;
1725 ep->destructor = destructor;
1726 ep->arg = arg;
1727 ep->r_a_tov = FC_DEF_R_A_TOV;
1728 ep->lp = lp;
1729 sp = &ep->seq;
1730
1731 ep->fh_type = fh->fh_type; /* save for possbile timeout handling */
1732 ep->f_ctl = ntoh24(fh->fh_f_ctl);
1733 fc_exch_setup_hdr(ep, fp, ep->f_ctl);
1734 sp->cnt++;
1735
1736 if (ep->xid <= lp->lro_xid)
1737 fc_fcp_ddp_setup(fr_fsp(fp), ep->xid);
1738
1739 if (unlikely(lp->tt.frame_send(lp, fp)))
1740 goto err;
1741
1742 if (timer_msec)
1743 fc_exch_timer_set_locked(ep, timer_msec);
1744 ep->f_ctl &= ~FC_FC_FIRST_SEQ; /* not first seq */
1745
1746 if (ep->f_ctl & FC_FC_SEQ_INIT)
1747 ep->esb_stat &= ~ESB_ST_SEQ_INIT;
1748 spin_unlock_bh(&ep->ex_lock);
1749 return sp;
1750err:
1751 rc = fc_exch_done_locked(ep);
1752 spin_unlock_bh(&ep->ex_lock);
1753 if (!rc)
1754 fc_exch_delete(ep);
1755 return NULL;
1756}
1757
Robert Love42e9a922008-12-09 15:10:17 -08001758/*
1759 * Send ELS RRQ - Reinstate Recovery Qualifier.
1760 * This tells the remote port to stop blocking the use of
1761 * the exchange and the seq_cnt range.
1762 */
1763static void fc_exch_rrq(struct fc_exch *ep)
1764{
1765 struct fc_lport *lp;
1766 struct fc_els_rrq *rrq;
1767 struct fc_frame *fp;
Robert Love42e9a922008-12-09 15:10:17 -08001768 u32 did;
1769
1770 lp = ep->lp;
1771
1772 fp = fc_frame_alloc(lp, sizeof(*rrq));
1773 if (!fp)
Vasu Deva0cc1ec2009-07-28 17:33:37 -07001774 goto retry;
1775
Robert Love42e9a922008-12-09 15:10:17 -08001776 rrq = fc_frame_payload_get(fp, sizeof(*rrq));
1777 memset(rrq, 0, sizeof(*rrq));
1778 rrq->rrq_cmd = ELS_RRQ;
1779 hton24(rrq->rrq_s_id, ep->sid);
1780 rrq->rrq_ox_id = htons(ep->oxid);
1781 rrq->rrq_rx_id = htons(ep->rxid);
1782
1783 did = ep->did;
1784 if (ep->esb_stat & ESB_ST_RESP)
1785 did = ep->sid;
1786
1787 fc_fill_fc_hdr(fp, FC_RCTL_ELS_REQ, did,
1788 fc_host_port_id(lp->host), FC_TYPE_ELS,
1789 FC_FC_FIRST_SEQ | FC_FC_END_SEQ | FC_FC_SEQ_INIT, 0);
1790
Vasu Deva0cc1ec2009-07-28 17:33:37 -07001791 if (fc_exch_seq_send(lp, fp, fc_exch_rrq_resp, NULL, ep, lp->e_d_tov))
1792 return;
1793
1794retry:
1795 spin_lock_bh(&ep->ex_lock);
1796 if (ep->state & (FC_EX_RST_CLEANUP | FC_EX_DONE)) {
1797 spin_unlock_bh(&ep->ex_lock);
1798 /* drop hold for rec qual */
1799 fc_exch_release(ep);
Robert Love42e9a922008-12-09 15:10:17 -08001800 return;
1801 }
Vasu Deva0cc1ec2009-07-28 17:33:37 -07001802 ep->esb_stat |= ESB_ST_REC_QUAL;
1803 fc_exch_timer_set_locked(ep, ep->r_a_tov);
1804 spin_unlock_bh(&ep->ex_lock);
Robert Love42e9a922008-12-09 15:10:17 -08001805}
1806
1807
1808/*
1809 * Handle incoming ELS RRQ - Reset Recovery Qualifier.
1810 */
1811static void fc_exch_els_rrq(struct fc_seq *sp, struct fc_frame *fp)
1812{
Vasu Dev3f127ad2009-10-21 16:27:33 -07001813 struct fc_exch *ep = NULL; /* request or subject exchange */
Robert Love42e9a922008-12-09 15:10:17 -08001814 struct fc_els_rrq *rp;
1815 u32 sid;
1816 u16 xid;
1817 enum fc_els_rjt_explan explan;
1818
1819 rp = fc_frame_payload_get(fp, sizeof(*rp));
1820 explan = ELS_EXPL_INV_LEN;
1821 if (!rp)
1822 goto reject;
1823
1824 /*
1825 * lookup subject exchange.
1826 */
1827 ep = fc_seq_exch(sp);
1828 sid = ntoh24(rp->rrq_s_id); /* subject source */
1829 xid = ep->did == sid ? ntohs(rp->rrq_ox_id) : ntohs(rp->rrq_rx_id);
1830 ep = fc_exch_find(ep->em, xid);
1831
1832 explan = ELS_EXPL_OXID_RXID;
1833 if (!ep)
1834 goto reject;
1835 spin_lock_bh(&ep->ex_lock);
1836 if (ep->oxid != ntohs(rp->rrq_ox_id))
1837 goto unlock_reject;
1838 if (ep->rxid != ntohs(rp->rrq_rx_id) &&
1839 ep->rxid != FC_XID_UNKNOWN)
1840 goto unlock_reject;
1841 explan = ELS_EXPL_SID;
1842 if (ep->sid != sid)
1843 goto unlock_reject;
1844
1845 /*
1846 * Clear Recovery Qualifier state, and cancel timer if complete.
1847 */
1848 if (ep->esb_stat & ESB_ST_REC_QUAL) {
1849 ep->esb_stat &= ~ESB_ST_REC_QUAL;
1850 atomic_dec(&ep->ex_refcnt); /* drop hold for rec qual */
1851 }
1852 if (ep->esb_stat & ESB_ST_COMPLETE) {
1853 if (cancel_delayed_work(&ep->timeout_work))
1854 atomic_dec(&ep->ex_refcnt); /* drop timer hold */
1855 }
1856
1857 spin_unlock_bh(&ep->ex_lock);
1858
1859 /*
1860 * Send LS_ACC.
1861 */
1862 fc_seq_ls_acc(sp);
Vasu Dev3f127ad2009-10-21 16:27:33 -07001863 goto out;
Robert Love42e9a922008-12-09 15:10:17 -08001864
1865unlock_reject:
1866 spin_unlock_bh(&ep->ex_lock);
Robert Love42e9a922008-12-09 15:10:17 -08001867reject:
1868 fc_seq_ls_rjt(sp, ELS_RJT_LOGIC, explan);
Vasu Dev3f127ad2009-10-21 16:27:33 -07001869out:
Robert Love42e9a922008-12-09 15:10:17 -08001870 fc_frame_free(fp);
Vasu Dev3f127ad2009-10-21 16:27:33 -07001871 if (ep)
1872 fc_exch_release(ep); /* drop hold from fc_exch_find */
Robert Love42e9a922008-12-09 15:10:17 -08001873}
1874
Vasu Dev96316092009-07-29 17:05:00 -07001875struct fc_exch_mgr_anchor *fc_exch_mgr_add(struct fc_lport *lport,
1876 struct fc_exch_mgr *mp,
1877 bool (*match)(struct fc_frame *))
1878{
1879 struct fc_exch_mgr_anchor *ema;
1880
1881 ema = kmalloc(sizeof(*ema), GFP_ATOMIC);
1882 if (!ema)
1883 return ema;
1884
1885 ema->mp = mp;
1886 ema->match = match;
1887 /* add EM anchor to EM anchors list */
1888 list_add_tail(&ema->ema_list, &lport->ema_list);
1889 kref_get(&mp->kref);
1890 return ema;
1891}
1892EXPORT_SYMBOL(fc_exch_mgr_add);
1893
1894static void fc_exch_mgr_destroy(struct kref *kref)
1895{
1896 struct fc_exch_mgr *mp = container_of(kref, struct fc_exch_mgr, kref);
1897
Vasu Dev96316092009-07-29 17:05:00 -07001898 mempool_destroy(mp->ep_pool);
Vasu Deve4bc50b2009-08-25 13:58:47 -07001899 free_percpu(mp->pool);
Vasu Dev96316092009-07-29 17:05:00 -07001900 kfree(mp);
1901}
1902
1903void fc_exch_mgr_del(struct fc_exch_mgr_anchor *ema)
1904{
1905 /* remove EM anchor from EM anchors list */
1906 list_del(&ema->ema_list);
1907 kref_put(&ema->mp->kref, fc_exch_mgr_destroy);
1908 kfree(ema);
1909}
1910EXPORT_SYMBOL(fc_exch_mgr_del);
1911
Chris Leech174e1eb2009-11-03 11:46:14 -08001912/**
1913 * fc_exch_mgr_list_clone() - share all exchange manager objects
1914 * @src: source lport to clone exchange managers from
1915 * @dst: new lport that takes references to all the exchange managers
1916 */
1917int fc_exch_mgr_list_clone(struct fc_lport *src, struct fc_lport *dst)
1918{
1919 struct fc_exch_mgr_anchor *ema, *tmp;
1920
1921 list_for_each_entry(ema, &src->ema_list, ema_list) {
1922 if (!fc_exch_mgr_add(dst, ema->mp, ema->match))
1923 goto err;
1924 }
1925 return 0;
1926err:
1927 list_for_each_entry_safe(ema, tmp, &dst->ema_list, ema_list)
1928 fc_exch_mgr_del(ema);
1929 return -ENOMEM;
1930}
1931
Robert Love42e9a922008-12-09 15:10:17 -08001932struct fc_exch_mgr *fc_exch_mgr_alloc(struct fc_lport *lp,
1933 enum fc_class class,
Vasu Dev52ff8782009-07-29 17:05:10 -07001934 u16 min_xid, u16 max_xid,
1935 bool (*match)(struct fc_frame *))
Robert Love42e9a922008-12-09 15:10:17 -08001936{
1937 struct fc_exch_mgr *mp;
Vasu Deve4bc50b2009-08-25 13:58:47 -07001938 u16 pool_exch_range;
1939 size_t pool_size;
1940 unsigned int cpu;
1941 struct fc_exch_pool *pool;
Robert Love42e9a922008-12-09 15:10:17 -08001942
Vasu Deve4bc50b2009-08-25 13:58:47 -07001943 if (max_xid <= min_xid || max_xid == FC_XID_UNKNOWN ||
1944 (min_xid & fc_cpu_mask) != 0) {
Robert Love74147052009-06-10 15:31:10 -07001945 FC_LPORT_DBG(lp, "Invalid min_xid 0x:%x and max_xid 0x:%x\n",
1946 min_xid, max_xid);
Robert Love42e9a922008-12-09 15:10:17 -08001947 return NULL;
1948 }
1949
1950 /*
Vasu Devb2f00912009-08-25 13:58:53 -07001951 * allocate memory for EM
Robert Love42e9a922008-12-09 15:10:17 -08001952 */
Vasu Devb2f00912009-08-25 13:58:53 -07001953 mp = kzalloc(sizeof(struct fc_exch_mgr), GFP_ATOMIC);
Robert Love42e9a922008-12-09 15:10:17 -08001954 if (!mp)
1955 return NULL;
1956
1957 mp->class = class;
Robert Love42e9a922008-12-09 15:10:17 -08001958 /* adjust em exch xid range for offload */
1959 mp->min_xid = min_xid;
1960 mp->max_xid = max_xid;
Robert Love42e9a922008-12-09 15:10:17 -08001961
1962 mp->ep_pool = mempool_create_slab_pool(2, fc_em_cachep);
1963 if (!mp->ep_pool)
1964 goto free_mp;
1965
Vasu Deve4bc50b2009-08-25 13:58:47 -07001966 /*
1967 * Setup per cpu exch pool with entire exchange id range equally
1968 * divided across all cpus. The exch pointers array memory is
1969 * allocated for exch range per pool.
1970 */
1971 pool_exch_range = (mp->max_xid - mp->min_xid + 1) / (fc_cpu_mask + 1);
1972 mp->pool_max_index = pool_exch_range - 1;
1973
1974 /*
1975 * Allocate and initialize per cpu exch pool
1976 */
1977 pool_size = sizeof(*pool) + pool_exch_range * sizeof(struct fc_exch *);
1978 mp->pool = __alloc_percpu(pool_size, __alignof__(struct fc_exch_pool));
1979 if (!mp->pool)
1980 goto free_mempool;
1981 for_each_possible_cpu(cpu) {
1982 pool = per_cpu_ptr(mp->pool, cpu);
1983 spin_lock_init(&pool->lock);
1984 INIT_LIST_HEAD(&pool->ex_list);
1985 }
1986
Vasu Dev52ff8782009-07-29 17:05:10 -07001987 kref_init(&mp->kref);
1988 if (!fc_exch_mgr_add(lp, mp, match)) {
Vasu Deve4bc50b2009-08-25 13:58:47 -07001989 free_percpu(mp->pool);
1990 goto free_mempool;
Vasu Dev52ff8782009-07-29 17:05:10 -07001991 }
1992
1993 /*
1994 * Above kref_init() sets mp->kref to 1 and then
1995 * call to fc_exch_mgr_add incremented mp->kref again,
1996 * so adjust that extra increment.
1997 */
1998 kref_put(&mp->kref, fc_exch_mgr_destroy);
Robert Love42e9a922008-12-09 15:10:17 -08001999 return mp;
2000
Vasu Deve4bc50b2009-08-25 13:58:47 -07002001free_mempool:
2002 mempool_destroy(mp->ep_pool);
Robert Love42e9a922008-12-09 15:10:17 -08002003free_mp:
2004 kfree(mp);
2005 return NULL;
2006}
2007EXPORT_SYMBOL(fc_exch_mgr_alloc);
2008
Vasu Dev52ff8782009-07-29 17:05:10 -07002009void fc_exch_mgr_free(struct fc_lport *lport)
Robert Love42e9a922008-12-09 15:10:17 -08002010{
Vasu Dev52ff8782009-07-29 17:05:10 -07002011 struct fc_exch_mgr_anchor *ema, *next;
2012
2013 list_for_each_entry_safe(ema, next, &lport->ema_list, ema_list)
2014 fc_exch_mgr_del(ema);
Robert Love42e9a922008-12-09 15:10:17 -08002015}
2016EXPORT_SYMBOL(fc_exch_mgr_free);
2017
Robert Love42e9a922008-12-09 15:10:17 -08002018/*
2019 * Receive a frame
2020 */
Vasu Dev52ff8782009-07-29 17:05:10 -07002021void fc_exch_recv(struct fc_lport *lp, struct fc_frame *fp)
Robert Love42e9a922008-12-09 15:10:17 -08002022{
2023 struct fc_frame_header *fh = fc_frame_header_get(fp);
Vasu Dev52ff8782009-07-29 17:05:10 -07002024 struct fc_exch_mgr_anchor *ema;
2025 u32 f_ctl, found = 0;
2026 u16 oxid;
Robert Love42e9a922008-12-09 15:10:17 -08002027
2028 /* lport lock ? */
Vasu Dev52ff8782009-07-29 17:05:10 -07002029 if (!lp || lp->state == LPORT_ST_DISABLED) {
Robert Love74147052009-06-10 15:31:10 -07002030 FC_LPORT_DBG(lp, "Receiving frames for an lport that "
2031 "has not been initialized correctly\n");
Robert Love42e9a922008-12-09 15:10:17 -08002032 fc_frame_free(fp);
2033 return;
2034 }
2035
Vasu Dev52ff8782009-07-29 17:05:10 -07002036 f_ctl = ntoh24(fh->fh_f_ctl);
2037 oxid = ntohs(fh->fh_ox_id);
2038 if (f_ctl & FC_FC_EX_CTX) {
2039 list_for_each_entry(ema, &lp->ema_list, ema_list) {
2040 if ((oxid >= ema->mp->min_xid) &&
2041 (oxid <= ema->mp->max_xid)) {
2042 found = 1;
2043 break;
2044 }
2045 }
2046
2047 if (!found) {
2048 FC_LPORT_DBG(lp, "Received response for out "
2049 "of range oxid:%hx\n", oxid);
2050 fc_frame_free(fp);
2051 return;
2052 }
2053 } else
2054 ema = list_entry(lp->ema_list.prev, typeof(*ema), ema_list);
2055
Robert Love42e9a922008-12-09 15:10:17 -08002056 /*
2057 * If frame is marked invalid, just drop it.
2058 */
Robert Love42e9a922008-12-09 15:10:17 -08002059 switch (fr_eof(fp)) {
2060 case FC_EOF_T:
2061 if (f_ctl & FC_FC_END_SEQ)
2062 skb_trim(fp_skb(fp), fr_len(fp) - FC_FC_FILL(f_ctl));
2063 /* fall through */
2064 case FC_EOF_N:
2065 if (fh->fh_type == FC_TYPE_BLS)
Vasu Dev52ff8782009-07-29 17:05:10 -07002066 fc_exch_recv_bls(ema->mp, fp);
Robert Love42e9a922008-12-09 15:10:17 -08002067 else if ((f_ctl & (FC_FC_EX_CTX | FC_FC_SEQ_CTX)) ==
2068 FC_FC_EX_CTX)
Vasu Dev52ff8782009-07-29 17:05:10 -07002069 fc_exch_recv_seq_resp(ema->mp, fp);
Robert Love42e9a922008-12-09 15:10:17 -08002070 else if (f_ctl & FC_FC_SEQ_CTX)
Vasu Dev52ff8782009-07-29 17:05:10 -07002071 fc_exch_recv_resp(ema->mp, fp);
Robert Love42e9a922008-12-09 15:10:17 -08002072 else
Vasu Dev52ff8782009-07-29 17:05:10 -07002073 fc_exch_recv_req(lp, ema->mp, fp);
Robert Love42e9a922008-12-09 15:10:17 -08002074 break;
2075 default:
Robert Loved459b7e2009-07-29 17:05:05 -07002076 FC_LPORT_DBG(lp, "dropping invalid frame (eof %x)", fr_eof(fp));
Robert Love42e9a922008-12-09 15:10:17 -08002077 fc_frame_free(fp);
Robert Love42e9a922008-12-09 15:10:17 -08002078 }
2079}
2080EXPORT_SYMBOL(fc_exch_recv);
2081
2082int fc_exch_init(struct fc_lport *lp)
2083{
Robert Love42e9a922008-12-09 15:10:17 -08002084 if (!lp->tt.seq_start_next)
2085 lp->tt.seq_start_next = fc_seq_start_next;
2086
2087 if (!lp->tt.exch_seq_send)
2088 lp->tt.exch_seq_send = fc_exch_seq_send;
2089
2090 if (!lp->tt.seq_send)
2091 lp->tt.seq_send = fc_seq_send;
2092
2093 if (!lp->tt.seq_els_rsp_send)
2094 lp->tt.seq_els_rsp_send = fc_seq_els_rsp_send;
2095
2096 if (!lp->tt.exch_done)
2097 lp->tt.exch_done = fc_exch_done;
2098
2099 if (!lp->tt.exch_mgr_reset)
2100 lp->tt.exch_mgr_reset = fc_exch_mgr_reset;
2101
2102 if (!lp->tt.seq_exch_abort)
2103 lp->tt.seq_exch_abort = fc_seq_exch_abort;
2104
Vasu Dev89f19a52009-10-21 16:27:28 -07002105 return 0;
2106}
2107EXPORT_SYMBOL(fc_exch_init);
2108
2109/**
2110 * fc_setup_exch_mgr() - Setup an exchange manager
2111 */
2112int fc_setup_exch_mgr()
2113{
2114 fc_em_cachep = kmem_cache_create("libfc_em", sizeof(struct fc_exch),
2115 0, SLAB_HWCACHE_ALIGN, NULL);
2116 if (!fc_em_cachep)
2117 return -ENOMEM;
2118
Vasu Deve4bc50b2009-08-25 13:58:47 -07002119 /*
2120 * Initialize fc_cpu_mask and fc_cpu_order. The
2121 * fc_cpu_mask is set for nr_cpu_ids rounded up
2122 * to order of 2's * power and order is stored
2123 * in fc_cpu_order as this is later required in
2124 * mapping between an exch id and exch array index
2125 * in per cpu exch pool.
2126 *
2127 * This round up is required to align fc_cpu_mask
2128 * to exchange id's lower bits such that all incoming
2129 * frames of an exchange gets delivered to the same
2130 * cpu on which exchange originated by simple bitwise
2131 * AND operation between fc_cpu_mask and exchange id.
2132 */
2133 fc_cpu_mask = 1;
2134 fc_cpu_order = 0;
2135 while (fc_cpu_mask < nr_cpu_ids) {
2136 fc_cpu_mask <<= 1;
2137 fc_cpu_order++;
2138 }
2139 fc_cpu_mask--;
2140
Robert Love42e9a922008-12-09 15:10:17 -08002141 return 0;
2142}
Robert Love42e9a922008-12-09 15:10:17 -08002143
2144void fc_destroy_exch_mgr(void)
2145{
2146 kmem_cache_destroy(fc_em_cachep);
2147}