?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
[SCSI] zfcp: print bit error threshold data human readable
[linux-2.6/openmoko-kernel/knife-kernel.git] / drivers / s390 / scsi / zfcp_fsf.c
blob55785acf8709ed300332a03c11f5b07b9f70f1ac
1 /*
2 * This file is part of the zfcp device driver for
3 * FCP adapters for IBM System z9 and zSeries.
4 *
5 * (C) Copyright IBM Corp. 2002, 2006
6 *
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 2, or (at your option)
10 * any later version.
11 *
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, write to the Free Software
19 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20 */
21
22 #include "zfcp_ext.h"
23
24 static int zfcp_fsf_exchange_config_data_handler(struct zfcp_fsf_req *);
25 static void zfcp_fsf_exchange_port_data_handler(struct zfcp_fsf_req *);
26 static int zfcp_fsf_open_port_handler(struct zfcp_fsf_req *);
27 static int zfcp_fsf_close_port_handler(struct zfcp_fsf_req *);
28 static int zfcp_fsf_close_physical_port_handler(struct zfcp_fsf_req *);
29 static int zfcp_fsf_open_unit_handler(struct zfcp_fsf_req *);
30 static int zfcp_fsf_close_unit_handler(struct zfcp_fsf_req *);
31 static int zfcp_fsf_send_fcp_command_handler(struct zfcp_fsf_req *);
32 static int zfcp_fsf_send_fcp_command_task_handler(struct zfcp_fsf_req *);
33 static int zfcp_fsf_send_fcp_command_task_management_handler(
34 struct zfcp_fsf_req *);
35 static int zfcp_fsf_abort_fcp_command_handler(struct zfcp_fsf_req *);
36 static int zfcp_fsf_status_read_handler(struct zfcp_fsf_req *);
37 static int zfcp_fsf_send_ct_handler(struct zfcp_fsf_req *);
38 static int zfcp_fsf_send_els_handler(struct zfcp_fsf_req *);
39 static int zfcp_fsf_control_file_handler(struct zfcp_fsf_req *);
40 static inline int zfcp_fsf_req_sbal_check(
41 unsigned long *, struct zfcp_qdio_queue *, int);
42 static inline int zfcp_use_one_sbal(
43 struct scatterlist *, int, struct scatterlist *, int);
44 static struct zfcp_fsf_req *zfcp_fsf_req_alloc(mempool_t *, int);
45 static int zfcp_fsf_req_send(struct zfcp_fsf_req *, struct timer_list *);
46 static int zfcp_fsf_protstatus_eval(struct zfcp_fsf_req *);
47 static int zfcp_fsf_fsfstatus_eval(struct zfcp_fsf_req *);
48 static int zfcp_fsf_fsfstatus_qual_eval(struct zfcp_fsf_req *);
49 static void zfcp_fsf_link_down_info_eval(struct zfcp_adapter *,
50 struct fsf_link_down_info *);
51 static int zfcp_fsf_req_dispatch(struct zfcp_fsf_req *);
52 static void zfcp_fsf_req_dismiss(struct zfcp_fsf_req *);
53
54 /* association between FSF command and FSF QTCB type */
55 static u32 fsf_qtcb_type[] = {
56 [FSF_QTCB_FCP_CMND] = FSF_IO_COMMAND,
57 [FSF_QTCB_ABORT_FCP_CMND] = FSF_SUPPORT_COMMAND,
58 [FSF_QTCB_OPEN_PORT_WITH_DID] = FSF_SUPPORT_COMMAND,
59 [FSF_QTCB_OPEN_LUN] = FSF_SUPPORT_COMMAND,
60 [FSF_QTCB_CLOSE_LUN] = FSF_SUPPORT_COMMAND,
61 [FSF_QTCB_CLOSE_PORT] = FSF_SUPPORT_COMMAND,
62 [FSF_QTCB_CLOSE_PHYSICAL_PORT] = FSF_SUPPORT_COMMAND,
63 [FSF_QTCB_SEND_ELS] = FSF_SUPPORT_COMMAND,
64 [FSF_QTCB_SEND_GENERIC] = FSF_SUPPORT_COMMAND,
65 [FSF_QTCB_EXCHANGE_CONFIG_DATA] = FSF_CONFIG_COMMAND,
66 [FSF_QTCB_EXCHANGE_PORT_DATA] = FSF_PORT_COMMAND,
67 [FSF_QTCB_DOWNLOAD_CONTROL_FILE] = FSF_SUPPORT_COMMAND,
68 [FSF_QTCB_UPLOAD_CONTROL_FILE] = FSF_SUPPORT_COMMAND
69 };
70
71 static const char zfcp_act_subtable_type[5][8] = {
72 "unknown", "OS", "WWPN", "DID", "LUN"
73 };
74
75 /****************************************************************/
76 /*************** FSF related Functions *************************/
77 /****************************************************************/
78
79 #define ZFCP_LOG_AREA ZFCP_LOG_AREA_FSF
80
81 /*
82 * function: zfcp_fsf_req_alloc
83 *
84 * purpose: Obtains an fsf_req and potentially a qtcb (for all but
85 * unsolicited requests) via helper functions
86 * Does some initial fsf request set-up.
87 *
88 * returns: pointer to allocated fsf_req if successfull
89 * NULL otherwise
90 *
91 * locks: none
92 *
93 */
94 static struct zfcp_fsf_req *
95 zfcp_fsf_req_alloc(mempool_t *pool, int req_flags)
96 {
97 size_t size;
98 void *ptr;
99 struct zfcp_fsf_req *fsf_req = NULL;
100
101 if (req_flags & ZFCP_REQ_NO_QTCB)
102 size = sizeof(struct zfcp_fsf_req);
103 else
104 size = sizeof(struct zfcp_fsf_req_pool_element);
105
106 if (likely(pool != NULL))
107 ptr = mempool_alloc(pool, GFP_ATOMIC);
108 else
109 ptr = kmalloc(size, GFP_ATOMIC);
110
111 if (unlikely(NULL == ptr))
112 goto out;
113
114 memset(ptr, 0, size);
115
116 if (req_flags & ZFCP_REQ_NO_QTCB) {
117 fsf_req = (struct zfcp_fsf_req *) ptr;
118 } else {
119 fsf_req = &((struct zfcp_fsf_req_pool_element *) ptr)->fsf_req;
120 fsf_req->qtcb =
121 &((struct zfcp_fsf_req_pool_element *) ptr)->qtcb;
122 }
123
124 fsf_req->pool = pool;
125
126 out:
127 return fsf_req;
128 }
129
130 /*
131 * function: zfcp_fsf_req_free
132 *
133 * purpose: Frees the memory of an fsf_req (and potentially a qtcb) or
134 * returns it into the pool via helper functions.
135 *
136 * returns: sod all
137 *
138 * locks: none
139 */
140 void
141 zfcp_fsf_req_free(struct zfcp_fsf_req *fsf_req)
142 {
143 if (likely(fsf_req->pool != NULL))
144 mempool_free(fsf_req, fsf_req->pool);
145 else
146 kfree(fsf_req);
147 }
148
149 /*
150 * function:
151 *
152 * purpose:
153 *
154 * returns:
155 *
156 * note: qdio queues shall be down (no ongoing inbound processing)
157 */
158 int
159 zfcp_fsf_req_dismiss_all(struct zfcp_adapter *adapter)
160 {
161 struct zfcp_fsf_req *fsf_req, *tmp;
162 unsigned long flags;
163 LIST_HEAD(remove_queue);
164
165 spin_lock_irqsave(&adapter->fsf_req_list_lock, flags);
166 list_splice_init(&adapter->fsf_req_list_head, &remove_queue);
167 atomic_set(&adapter->fsf_reqs_active, 0);
168 spin_unlock_irqrestore(&adapter->fsf_req_list_lock, flags);
169
170 list_for_each_entry_safe(fsf_req, tmp, &remove_queue, list) {
171 list_del(&fsf_req->list);
172 zfcp_fsf_req_dismiss(fsf_req);
173 }
174
175 return 0;
176 }
177
178 /*
179 * function:
180 *
181 * purpose:
182 *
183 * returns:
184 */
185 static void
186 zfcp_fsf_req_dismiss(struct zfcp_fsf_req *fsf_req)
187 {
188 fsf_req->status |= ZFCP_STATUS_FSFREQ_DISMISSED;
189 zfcp_fsf_req_complete(fsf_req);
190 }
191
192 /*
193 * function: zfcp_fsf_req_complete
194 *
195 * purpose: Updates active counts and timers for openfcp-reqs
196 * May cleanup request after req_eval returns
197 *
198 * returns: 0 - success
199 * !0 - failure
200 *
201 * context:
202 */
203 int
204 zfcp_fsf_req_complete(struct zfcp_fsf_req *fsf_req)
205 {
206 int retval = 0;
207 int cleanup;
208
209 if (unlikely(fsf_req->fsf_command == FSF_QTCB_UNSOLICITED_STATUS)) {
210 ZFCP_LOG_DEBUG("Status read response received\n");
211 /*
212 * Note: all cleanup handling is done in the callchain of
213 * the function call-chain below.
214 */
215 zfcp_fsf_status_read_handler(fsf_req);
216 goto out;
217 } else
218 zfcp_fsf_protstatus_eval(fsf_req);
219
220 /*
221 * fsf_req may be deleted due to waking up functions, so
222 * cleanup is saved here and used later
223 */
224 if (likely(fsf_req->status & ZFCP_STATUS_FSFREQ_CLEANUP))
225 cleanup = 1;
226 else
227 cleanup = 0;
228
229 fsf_req->status |= ZFCP_STATUS_FSFREQ_COMPLETED;
230
231 /* cleanup request if requested by initiator */
232 if (likely(cleanup)) {
233 ZFCP_LOG_TRACE("removing FSF request %p\n", fsf_req);
234 /*
235 * lock must not be held here since it will be
236 * grabed by the called routine, too
237 */
238 zfcp_fsf_req_free(fsf_req);
239 } else {
240 /* notify initiator waiting for the requests completion */
241 ZFCP_LOG_TRACE("waking initiator of FSF request %p\n",fsf_req);
242 /*
243 * FIXME: Race! We must not access fsf_req here as it might have been
244 * cleaned up already due to the set ZFCP_STATUS_FSFREQ_COMPLETED
245 * flag. It's an improbable case. But, we have the same paranoia for
246 * the cleanup flag already.
247 * Might better be handled using complete()?
248 * (setting the flag and doing wakeup ought to be atomic
249 * with regard to checking the flag as long as waitqueue is
250 * part of the to be released structure)
251 */
252 wake_up(&fsf_req->completion_wq);
253 }
254
255 out:
256 return retval;
257 }
258
259 /*
260 * function: zfcp_fsf_protstatus_eval
261 *
262 * purpose: evaluates the QTCB of the finished FSF request
263 * and initiates appropriate actions
264 * (usually calling FSF command specific handlers)
265 *
266 * returns:
267 *
268 * context:
269 *
270 * locks:
271 */
272 static int
273 zfcp_fsf_protstatus_eval(struct zfcp_fsf_req *fsf_req)
274 {
275 int retval = 0;
276 struct zfcp_adapter *adapter = fsf_req->adapter;
277 struct fsf_qtcb *qtcb = fsf_req->qtcb;
278 union fsf_prot_status_qual *prot_status_qual =
279 &qtcb->prefix.prot_status_qual;
280
281 zfcp_hba_dbf_event_fsf_response(fsf_req);
282
283 if (fsf_req->status & ZFCP_STATUS_FSFREQ_DISMISSED) {
284 ZFCP_LOG_DEBUG("fsf_req 0x%lx has been dismissed\n",
285 (unsigned long) fsf_req);
286 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR |
287 ZFCP_STATUS_FSFREQ_RETRY; /* only for SCSI cmnds. */
288 goto skip_protstatus;
289 }
290
291 /* log additional information provided by FSF (if any) */
292 if (unlikely(qtcb->header.log_length)) {
293 /* do not trust them ;-) */
294 if (qtcb->header.log_start > sizeof(struct fsf_qtcb)) {
295 ZFCP_LOG_NORMAL
296 ("bug: ULP (FSF logging) log data starts "
297 "beyond end of packet header. Ignored. "
298 "(start=%i, size=%li)\n",
299 qtcb->header.log_start,
300 sizeof(struct fsf_qtcb));
301 goto forget_log;
302 }
303 if ((size_t) (qtcb->header.log_start + qtcb->header.log_length)
304 > sizeof(struct fsf_qtcb)) {
305 ZFCP_LOG_NORMAL("bug: ULP (FSF logging) log data ends "
306 "beyond end of packet header. Ignored. "
307 "(start=%i, length=%i, size=%li)\n",
308 qtcb->header.log_start,
309 qtcb->header.log_length,
310 sizeof(struct fsf_qtcb));
311 goto forget_log;
312 }
313 ZFCP_LOG_TRACE("ULP log data: \n");
314 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_TRACE,
315 (char *) qtcb + qtcb->header.log_start,
316 qtcb->header.log_length);
317 }
318 forget_log:
319
320 /* evaluate FSF Protocol Status */
321 switch (qtcb->prefix.prot_status) {
322
323 case FSF_PROT_GOOD:
324 case FSF_PROT_FSF_STATUS_PRESENTED:
325 break;
326
327 case FSF_PROT_QTCB_VERSION_ERROR:
328 ZFCP_LOG_NORMAL("error: The adapter %s contains "
329 "microcode of version 0x%x, the device driver "
330 "only supports 0x%x. Aborting.\n",
331 zfcp_get_busid_by_adapter(adapter),
332 prot_status_qual->version_error.fsf_version,
333 ZFCP_QTCB_VERSION);
334 zfcp_erp_adapter_shutdown(adapter, 0);
335 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
336 break;
337
338 case FSF_PROT_SEQ_NUMB_ERROR:
339 ZFCP_LOG_NORMAL("bug: Sequence number mismatch between "
340 "driver (0x%x) and adapter %s (0x%x). "
341 "Restarting all operations on this adapter.\n",
342 qtcb->prefix.req_seq_no,
343 zfcp_get_busid_by_adapter(adapter),
344 prot_status_qual->sequence_error.exp_req_seq_no);
345 zfcp_erp_adapter_reopen(adapter, 0);
346 fsf_req->status |= ZFCP_STATUS_FSFREQ_RETRY;
347 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
348 break;
349
350 case FSF_PROT_UNSUPP_QTCB_TYPE:
351 ZFCP_LOG_NORMAL("error: Packet header type used by the "
352 "device driver is incompatible with "
353 "that used on adapter %s. "
354 "Stopping all operations on this adapter.\n",
355 zfcp_get_busid_by_adapter(adapter));
356 zfcp_erp_adapter_shutdown(adapter, 0);
357 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
358 break;
359
360 case FSF_PROT_HOST_CONNECTION_INITIALIZING:
361 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
362 atomic_set_mask(ZFCP_STATUS_ADAPTER_HOST_CON_INIT,
363 &(adapter->status));
364 break;
365
366 case FSF_PROT_DUPLICATE_REQUEST_ID:
367 ZFCP_LOG_NORMAL("bug: The request identifier 0x%Lx "
368 "to the adapter %s is ambiguous. "
369 "Stopping all operations on this adapter.\n",
370 *(unsigned long long*)
371 (&qtcb->bottom.support.req_handle),
372 zfcp_get_busid_by_adapter(adapter));
373 zfcp_erp_adapter_shutdown(adapter, 0);
374 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
375 break;
376
377 case FSF_PROT_LINK_DOWN:
378 zfcp_fsf_link_down_info_eval(adapter,
379 &prot_status_qual->link_down_info);
380 zfcp_erp_adapter_reopen(adapter, 0);
381 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
382 break;
383
384 case FSF_PROT_REEST_QUEUE:
385 ZFCP_LOG_NORMAL("The local link to adapter with "
386 "%s was re-plugged. "
387 "Re-starting operations on this adapter.\n",
388 zfcp_get_busid_by_adapter(adapter));
389 /* All ports should be marked as ready to run again */
390 zfcp_erp_modify_adapter_status(adapter,
391 ZFCP_STATUS_COMMON_RUNNING,
392 ZFCP_SET);
393 zfcp_erp_adapter_reopen(adapter,
394 ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED
395 | ZFCP_STATUS_COMMON_ERP_FAILED);
396 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
397 break;
398
399 case FSF_PROT_ERROR_STATE:
400 ZFCP_LOG_NORMAL("error: The adapter %s "
401 "has entered the error state. "
402 "Restarting all operations on this "
403 "adapter.\n",
404 zfcp_get_busid_by_adapter(adapter));
405 zfcp_erp_adapter_reopen(adapter, 0);
406 fsf_req->status |= ZFCP_STATUS_FSFREQ_RETRY;
407 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
408 break;
409
410 default:
411 ZFCP_LOG_NORMAL("bug: Transfer protocol status information "
412 "provided by the adapter %s "
413 "is not compatible with the device driver. "
414 "Stopping all operations on this adapter. "
415 "(debug info 0x%x).\n",
416 zfcp_get_busid_by_adapter(adapter),
417 qtcb->prefix.prot_status);
418 zfcp_erp_adapter_shutdown(adapter, 0);
419 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
420 }
421
422 skip_protstatus:
423 /*
424 * always call specific handlers to give them a chance to do
425 * something meaningful even in error cases
426 */
427 zfcp_fsf_fsfstatus_eval(fsf_req);
428 return retval;
429 }
430
431 /*
432 * function: zfcp_fsf_fsfstatus_eval
433 *
434 * purpose: evaluates FSF status of completed FSF request
435 * and acts accordingly
436 *
437 * returns:
438 */
439 static int
440 zfcp_fsf_fsfstatus_eval(struct zfcp_fsf_req *fsf_req)
441 {
442 int retval = 0;
443
444 if (unlikely(fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR)) {
445 goto skip_fsfstatus;
446 }
447
448 /* evaluate FSF Status */
449 switch (fsf_req->qtcb->header.fsf_status) {
450 case FSF_UNKNOWN_COMMAND:
451 ZFCP_LOG_NORMAL("bug: Command issued by the device driver is "
452 "not known by the adapter %s "
453 "Stopping all operations on this adapter. "
454 "(debug info 0x%x).\n",
455 zfcp_get_busid_by_adapter(fsf_req->adapter),
456 fsf_req->qtcb->header.fsf_command);
457 zfcp_erp_adapter_shutdown(fsf_req->adapter, 0);
458 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
459 break;
460
461 case FSF_FCP_RSP_AVAILABLE:
462 ZFCP_LOG_DEBUG("FCP Sense data will be presented to the "
463 "SCSI stack.\n");
464 break;
465
466 case FSF_ADAPTER_STATUS_AVAILABLE:
467 zfcp_fsf_fsfstatus_qual_eval(fsf_req);
468 break;
469 }
470
471 skip_fsfstatus:
472 /*
473 * always call specific handlers to give them a chance to do
474 * something meaningful even in error cases
475 */
476 zfcp_fsf_req_dispatch(fsf_req);
477
478 return retval;
479 }
480
481 /*
482 * function: zfcp_fsf_fsfstatus_qual_eval
483 *
484 * purpose: evaluates FSF status-qualifier of completed FSF request
485 * and acts accordingly
486 *
487 * returns:
488 */
489 static int
490 zfcp_fsf_fsfstatus_qual_eval(struct zfcp_fsf_req *fsf_req)
491 {
492 int retval = 0;
493
494 switch (fsf_req->qtcb->header.fsf_status_qual.word[0]) {
495 case FSF_SQ_FCP_RSP_AVAILABLE:
496 break;
497 case FSF_SQ_RETRY_IF_POSSIBLE:
498 /* The SCSI-stack may now issue retries or escalate */
499 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
500 break;
501 case FSF_SQ_COMMAND_ABORTED:
502 /* Carry the aborted state on to upper layer */
503 fsf_req->status |= ZFCP_STATUS_FSFREQ_ABORTED;
504 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
505 break;
506 case FSF_SQ_NO_RECOM:
507 ZFCP_LOG_NORMAL("bug: No recommendation could be given for a"
508 "problem on the adapter %s "
509 "Stopping all operations on this adapter. ",
510 zfcp_get_busid_by_adapter(fsf_req->adapter));
511 zfcp_erp_adapter_shutdown(fsf_req->adapter, 0);
512 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
513 break;
514 case FSF_SQ_ULP_PROGRAMMING_ERROR:
515 ZFCP_LOG_NORMAL("error: not enough SBALs for data transfer "
516 "(adapter %s)\n",
517 zfcp_get_busid_by_adapter(fsf_req->adapter));
518 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
519 break;
520 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
521 case FSF_SQ_NO_RETRY_POSSIBLE:
522 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
523 /* dealt with in the respective functions */
524 break;
525 default:
526 ZFCP_LOG_NORMAL("bug: Additional status info could "
527 "not be interpreted properly.\n");
528 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_NORMAL,
529 (char *) &fsf_req->qtcb->header.fsf_status_qual,
530 sizeof (union fsf_status_qual));
531 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
532 break;
533 }
534
535 return retval;
536 }
537
538 /**
539 * zfcp_fsf_link_down_info_eval - evaluate link down information block
540 */
541 static void
542 zfcp_fsf_link_down_info_eval(struct zfcp_adapter *adapter,
543 struct fsf_link_down_info *link_down)
544 {
545 if (atomic_test_mask(ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED,
546 &adapter->status))
547 return;
548
549 atomic_set_mask(ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED, &adapter->status);
550
551 if (link_down == NULL)
552 goto out;
553
554 switch (link_down->error_code) {
555 case FSF_PSQ_LINK_NO_LIGHT:
556 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
557 "(no light detected)\n",
558 zfcp_get_busid_by_adapter(adapter));
559 break;
560 case FSF_PSQ_LINK_WRAP_PLUG:
561 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
562 "(wrap plug detected)\n",
563 zfcp_get_busid_by_adapter(adapter));
564 break;
565 case FSF_PSQ_LINK_NO_FCP:
566 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
567 "(adjacent node on link does not support FCP)\n",
568 zfcp_get_busid_by_adapter(adapter));
569 break;
570 case FSF_PSQ_LINK_FIRMWARE_UPDATE:
571 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
572 "(firmware update in progress)\n",
573 zfcp_get_busid_by_adapter(adapter));
574 break;
575 case FSF_PSQ_LINK_INVALID_WWPN:
576 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
577 "(duplicate or invalid WWPN detected)\n",
578 zfcp_get_busid_by_adapter(adapter));
579 break;
580 case FSF_PSQ_LINK_NO_NPIV_SUPPORT:
581 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
582 "(no support for NPIV by Fabric)\n",
583 zfcp_get_busid_by_adapter(adapter));
584 break;
585 case FSF_PSQ_LINK_NO_FCP_RESOURCES:
586 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
587 "(out of resource in FCP daughtercard)\n",
588 zfcp_get_busid_by_adapter(adapter));
589 break;
590 case FSF_PSQ_LINK_NO_FABRIC_RESOURCES:
591 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
592 "(out of resource in Fabric)\n",
593 zfcp_get_busid_by_adapter(adapter));
594 break;
595 case FSF_PSQ_LINK_FABRIC_LOGIN_UNABLE:
596 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
597 "(unable to Fabric login)\n",
598 zfcp_get_busid_by_adapter(adapter));
599 break;
600 case FSF_PSQ_LINK_WWPN_ASSIGNMENT_CORRUPTED:
601 ZFCP_LOG_NORMAL("WWPN assignment file corrupted on adapter %s\n",
602 zfcp_get_busid_by_adapter(adapter));
603 break;
604 case FSF_PSQ_LINK_MODE_TABLE_CURRUPTED:
605 ZFCP_LOG_NORMAL("Mode table corrupted on adapter %s\n",
606 zfcp_get_busid_by_adapter(adapter));
607 break;
608 case FSF_PSQ_LINK_NO_WWPN_ASSIGNMENT:
609 ZFCP_LOG_NORMAL("No WWPN for assignment table on adapter %s\n",
610 zfcp_get_busid_by_adapter(adapter));
611 break;
612 default:
613 ZFCP_LOG_NORMAL("The local link to adapter %s is down "
614 "(warning: unknown reason code %d)\n",
615 zfcp_get_busid_by_adapter(adapter),
616 link_down->error_code);
617 }
618
619 if (adapter->connection_features & FSF_FEATURE_NPIV_MODE)
620 ZFCP_LOG_DEBUG("Debug information to link down: "
621 "primary_status=0x%02x "
622 "ioerr_code=0x%02x "
623 "action_code=0x%02x "
624 "reason_code=0x%02x "
625 "explanation_code=0x%02x "
626 "vendor_specific_code=0x%02x\n",
627 link_down->primary_status,
628 link_down->ioerr_code,
629 link_down->action_code,
630 link_down->reason_code,
631 link_down->explanation_code,
632 link_down->vendor_specific_code);
633
634 out:
635 zfcp_erp_adapter_failed(adapter);
636 }
637
638 /*
639 * function: zfcp_fsf_req_dispatch
640 *
641 * purpose: calls the appropriate command specific handler
642 *
643 * returns:
644 */
645 static int
646 zfcp_fsf_req_dispatch(struct zfcp_fsf_req *fsf_req)
647 {
648 struct zfcp_erp_action *erp_action = fsf_req->erp_action;
649 struct zfcp_adapter *adapter = fsf_req->adapter;
650 int retval = 0;
651
652
653 switch (fsf_req->fsf_command) {
654
655 case FSF_QTCB_FCP_CMND:
656 zfcp_fsf_send_fcp_command_handler(fsf_req);
657 break;
658
659 case FSF_QTCB_ABORT_FCP_CMND:
660 zfcp_fsf_abort_fcp_command_handler(fsf_req);
661 break;
662
663 case FSF_QTCB_SEND_GENERIC:
664 zfcp_fsf_send_ct_handler(fsf_req);
665 break;
666
667 case FSF_QTCB_OPEN_PORT_WITH_DID:
668 zfcp_fsf_open_port_handler(fsf_req);
669 break;
670
671 case FSF_QTCB_OPEN_LUN:
672 zfcp_fsf_open_unit_handler(fsf_req);
673 break;
674
675 case FSF_QTCB_CLOSE_LUN:
676 zfcp_fsf_close_unit_handler(fsf_req);
677 break;
678
679 case FSF_QTCB_CLOSE_PORT:
680 zfcp_fsf_close_port_handler(fsf_req);
681 break;
682
683 case FSF_QTCB_CLOSE_PHYSICAL_PORT:
684 zfcp_fsf_close_physical_port_handler(fsf_req);
685 break;
686
687 case FSF_QTCB_EXCHANGE_CONFIG_DATA:
688 zfcp_fsf_exchange_config_data_handler(fsf_req);
689 break;
690
691 case FSF_QTCB_EXCHANGE_PORT_DATA:
692 zfcp_fsf_exchange_port_data_handler(fsf_req);
693 break;
694
695 case FSF_QTCB_SEND_ELS:
696 zfcp_fsf_send_els_handler(fsf_req);
697 break;
698
699 case FSF_QTCB_DOWNLOAD_CONTROL_FILE:
700 zfcp_fsf_control_file_handler(fsf_req);
701 break;
702
703 case FSF_QTCB_UPLOAD_CONTROL_FILE:
704 zfcp_fsf_control_file_handler(fsf_req);
705 break;
706
707 default:
708 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
709 ZFCP_LOG_NORMAL("bug: Command issued by the device driver is "
710 "not supported by the adapter %s\n",
711 zfcp_get_busid_by_adapter(adapter));
712 if (fsf_req->fsf_command != fsf_req->qtcb->header.fsf_command)
713 ZFCP_LOG_NORMAL
714 ("bug: Command issued by the device driver differs "
715 "from the command returned by the adapter %s "
716 "(debug info 0x%x, 0x%x).\n",
717 zfcp_get_busid_by_adapter(adapter),
718 fsf_req->fsf_command,
719 fsf_req->qtcb->header.fsf_command);
720 }
721
722 if (!erp_action)
723 return retval;
724
725 zfcp_erp_async_handler(erp_action, 0);
726
727 return retval;
728 }
729
730 /*
731 * function: zfcp_fsf_status_read
732 *
733 * purpose: initiates a Status Read command at the specified adapter
734 *
735 * returns:
736 */
737 int
738 zfcp_fsf_status_read(struct zfcp_adapter *adapter, int req_flags)
739 {
740 struct zfcp_fsf_req *fsf_req;
741 struct fsf_status_read_buffer *status_buffer;
742 unsigned long lock_flags;
743 volatile struct qdio_buffer_element *sbale;
744 int retval = 0;
745
746 /* setup new FSF request */
747 retval = zfcp_fsf_req_create(adapter, FSF_QTCB_UNSOLICITED_STATUS,
748 req_flags | ZFCP_REQ_NO_QTCB,
749 adapter->pool.fsf_req_status_read,
750 &lock_flags, &fsf_req);
751 if (retval < 0) {
752 ZFCP_LOG_INFO("error: Could not create unsolicited status "
753 "buffer for adapter %s.\n",
754 zfcp_get_busid_by_adapter(adapter));
755 goto failed_req_create;
756 }
757
758 sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
759 sbale[0].flags |= SBAL_FLAGS0_TYPE_STATUS;
760 sbale[2].flags |= SBAL_FLAGS_LAST_ENTRY;
761 fsf_req->sbale_curr = 2;
762
763 status_buffer =
764 mempool_alloc(adapter->pool.data_status_read, GFP_ATOMIC);
765 if (!status_buffer) {
766 ZFCP_LOG_NORMAL("bug: could not get some buffer\n");
767 goto failed_buf;
768 }
769 memset(status_buffer, 0, sizeof (struct fsf_status_read_buffer));
770 fsf_req->data = (unsigned long) status_buffer;
771
772 /* insert pointer to respective buffer */
773 sbale = zfcp_qdio_sbale_curr(fsf_req);
774 sbale->addr = (void *) status_buffer;
775 sbale->length = sizeof(struct fsf_status_read_buffer);
776
777 /* start QDIO request for this FSF request */
778 retval = zfcp_fsf_req_send(fsf_req, NULL);
779 if (retval) {
780 ZFCP_LOG_DEBUG("error: Could not set-up unsolicited status "
781 "environment.\n");
782 goto failed_req_send;
783 }
784
785 ZFCP_LOG_TRACE("Status Read request initiated (adapter%s)\n",
786 zfcp_get_busid_by_adapter(adapter));
787 goto out;
788
789 failed_req_send:
790 mempool_free(status_buffer, adapter->pool.data_status_read);
791
792 failed_buf:
793 zfcp_fsf_req_free(fsf_req);
794 failed_req_create:
795 zfcp_hba_dbf_event_fsf_unsol("fail", adapter, NULL);
796 out:
797 write_unlock_irqrestore(&adapter->request_queue.queue_lock, lock_flags);
798 return retval;
799 }
800
801 static int
802 zfcp_fsf_status_read_port_closed(struct zfcp_fsf_req *fsf_req)
803 {
804 struct fsf_status_read_buffer *status_buffer;
805 struct zfcp_adapter *adapter;
806 struct zfcp_port *port;
807 unsigned long flags;
808
809 status_buffer = (struct fsf_status_read_buffer *) fsf_req->data;
810 adapter = fsf_req->adapter;
811
812 read_lock_irqsave(&zfcp_data.config_lock, flags);
813 list_for_each_entry(port, &adapter->port_list_head, list)
814 if (port->d_id == (status_buffer->d_id & ZFCP_DID_MASK))
815 break;
816 read_unlock_irqrestore(&zfcp_data.config_lock, flags);
817
818 if (!port || (port->d_id != (status_buffer->d_id & ZFCP_DID_MASK))) {
819 ZFCP_LOG_NORMAL("bug: Reopen port indication received for"
820 "nonexisting port with d_id 0x%08x on "
821 "adapter %s. Ignored.\n",
822 status_buffer->d_id & ZFCP_DID_MASK,
823 zfcp_get_busid_by_adapter(adapter));
824 goto out;
825 }
826
827 switch (status_buffer->status_subtype) {
828
829 case FSF_STATUS_READ_SUB_CLOSE_PHYS_PORT:
830 debug_text_event(adapter->erp_dbf, 3, "unsol_pc_phys:");
831 zfcp_erp_port_reopen(port, 0);
832 break;
833
834 case FSF_STATUS_READ_SUB_ERROR_PORT:
835 debug_text_event(adapter->erp_dbf, 1, "unsol_pc_err:");
836 zfcp_erp_port_shutdown(port, 0);
837 break;
838
839 default:
840 debug_text_event(adapter->erp_dbf, 0, "unsol_unk_sub:");
841 debug_exception(adapter->erp_dbf, 0,
842 &status_buffer->status_subtype, sizeof (u32));
843 ZFCP_LOG_NORMAL("bug: Undefined status subtype received "
844 "for a reopen indication on port with "
845 "d_id 0x%08x on the adapter %s. "
846 "Ignored. (debug info 0x%x)\n",
847 status_buffer->d_id,
848 zfcp_get_busid_by_adapter(adapter),
849 status_buffer->status_subtype);
850 }
851 out:
852 return 0;
853 }
854
855 /*
856 * function: zfcp_fsf_status_read_handler
857 *
858 * purpose: is called for finished Open Port command
859 *
860 * returns:
861 */
862 static int
863 zfcp_fsf_status_read_handler(struct zfcp_fsf_req *fsf_req)
864 {
865 int retval = 0;
866 struct zfcp_adapter *adapter = fsf_req->adapter;
867 struct fsf_status_read_buffer *status_buffer =
868 (struct fsf_status_read_buffer *) fsf_req->data;
869 struct fsf_bit_error_payload *fsf_bit_error;
870
871 if (fsf_req->status & ZFCP_STATUS_FSFREQ_DISMISSED) {
872 zfcp_hba_dbf_event_fsf_unsol("dism", adapter, status_buffer);
873 mempool_free(status_buffer, adapter->pool.data_status_read);
874 zfcp_fsf_req_free(fsf_req);
875 goto out;
876 }
877
878 zfcp_hba_dbf_event_fsf_unsol("read", adapter, status_buffer);
879
880 switch (status_buffer->status_type) {
881
882 case FSF_STATUS_READ_PORT_CLOSED:
883 zfcp_fsf_status_read_port_closed(fsf_req);
884 break;
885
886 case FSF_STATUS_READ_INCOMING_ELS:
887 zfcp_fsf_incoming_els(fsf_req);
888 break;
889
890 case FSF_STATUS_READ_SENSE_DATA_AVAIL:
891 ZFCP_LOG_INFO("unsolicited sense data received (adapter %s)\n",
892 zfcp_get_busid_by_adapter(adapter));
893 break;
894
895 case FSF_STATUS_READ_BIT_ERROR_THRESHOLD:
896 fsf_bit_error = (struct fsf_bit_error_payload *)
897 status_buffer->payload;
898 ZFCP_LOG_NORMAL("Warning: bit error threshold data "
899 "received (adapter %s, "
900 "link failures = %i, loss of sync errors = %i, "
901 "loss of signal errors = %i, "
902 "primitive sequence errors = %i, "
903 "invalid transmission word errors = %i, "
904 "CRC errors = %i)\n",
905 zfcp_get_busid_by_adapter(adapter),
906 fsf_bit_error->link_failure_error_count,
907 fsf_bit_error->loss_of_sync_error_count,
908 fsf_bit_error->loss_of_signal_error_count,
909 fsf_bit_error->primitive_sequence_error_count,
910 fsf_bit_error->invalid_transmission_word_error_count,
911 fsf_bit_error->crc_error_count);
912 ZFCP_LOG_INFO("Additional bit error threshold data "
913 "(adapter %s, "
914 "primitive sequence event time-outs = %i, "
915 "elastic buffer overrun errors = %i, "
916 "advertised receive buffer-to-buffer credit = %i, "
917 "current receice buffer-to-buffer credit = %i, "
918 "advertised transmit buffer-to-buffer credit = %i, "
919 "current transmit buffer-to-buffer credit = %i)\n",
920 zfcp_get_busid_by_adapter(adapter),
921 fsf_bit_error->primitive_sequence_event_timeout_count,
922 fsf_bit_error->elastic_buffer_overrun_error_count,
923 fsf_bit_error->advertised_receive_b2b_credit,
924 fsf_bit_error->current_receive_b2b_credit,
925 fsf_bit_error->advertised_transmit_b2b_credit,
926 fsf_bit_error->current_transmit_b2b_credit);
927 break;
928
929 case FSF_STATUS_READ_LINK_DOWN:
930 switch (status_buffer->status_subtype) {
931 case FSF_STATUS_READ_SUB_NO_PHYSICAL_LINK:
932 ZFCP_LOG_INFO("Physical link to adapter %s is down\n",
933 zfcp_get_busid_by_adapter(adapter));
934 zfcp_fsf_link_down_info_eval(adapter,
935 (struct fsf_link_down_info *)
936 &status_buffer->payload);
937 break;
938 case FSF_STATUS_READ_SUB_FDISC_FAILED:
939 ZFCP_LOG_INFO("Local link to adapter %s is down "
940 "due to failed FDISC login\n",
941 zfcp_get_busid_by_adapter(adapter));
942 zfcp_fsf_link_down_info_eval(adapter,
943 (struct fsf_link_down_info *)
944 &status_buffer->payload);
945 break;
946 case FSF_STATUS_READ_SUB_FIRMWARE_UPDATE:
947 ZFCP_LOG_INFO("Local link to adapter %s is down "
948 "due to firmware update on adapter\n",
949 zfcp_get_busid_by_adapter(adapter));
950 zfcp_fsf_link_down_info_eval(adapter, NULL);
951 break;
952 default:
953 ZFCP_LOG_INFO("Local link to adapter %s is down "
954 "due to unknown reason\n",
955 zfcp_get_busid_by_adapter(adapter));
956 zfcp_fsf_link_down_info_eval(adapter, NULL);
957 };
958 break;
959
960 case FSF_STATUS_READ_LINK_UP:
961 ZFCP_LOG_NORMAL("Local link to adapter %s was replugged. "
962 "Restarting operations on this adapter\n",
963 zfcp_get_busid_by_adapter(adapter));
964 /* All ports should be marked as ready to run again */
965 zfcp_erp_modify_adapter_status(adapter,
966 ZFCP_STATUS_COMMON_RUNNING,
967 ZFCP_SET);
968 zfcp_erp_adapter_reopen(adapter,
969 ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED
970 | ZFCP_STATUS_COMMON_ERP_FAILED);
971 break;
972
973 case FSF_STATUS_READ_NOTIFICATION_LOST:
974 ZFCP_LOG_NORMAL("Unsolicited status notification(s) lost: "
975 "adapter %s%s%s%s%s%s%s%s%s\n",
976 zfcp_get_busid_by_adapter(adapter),
977 (status_buffer->status_subtype &
978 FSF_STATUS_READ_SUB_INCOMING_ELS) ?
979 ", incoming ELS" : "",
980 (status_buffer->status_subtype &
981 FSF_STATUS_READ_SUB_SENSE_DATA) ?
982 ", sense data" : "",
983 (status_buffer->status_subtype &
984 FSF_STATUS_READ_SUB_LINK_STATUS) ?
985 ", link status change" : "",
986 (status_buffer->status_subtype &
987 FSF_STATUS_READ_SUB_PORT_CLOSED) ?
988 ", port close" : "",
989 (status_buffer->status_subtype &
990 FSF_STATUS_READ_SUB_BIT_ERROR_THRESHOLD) ?
991 ", bit error exception" : "",
992 (status_buffer->status_subtype &
993 FSF_STATUS_READ_SUB_ACT_UPDATED) ?
994 ", ACT update" : "",
995 (status_buffer->status_subtype &
996 FSF_STATUS_READ_SUB_ACT_HARDENED) ?
997 ", ACT hardening" : "",
998 (status_buffer->status_subtype &
999 FSF_STATUS_READ_SUB_FEATURE_UPDATE_ALERT) ?
1000 ", adapter feature change" : "");
1001
1002 if (status_buffer->status_subtype &
1003 FSF_STATUS_READ_SUB_ACT_UPDATED)
1004 zfcp_erp_adapter_access_changed(adapter);
1005 break;
1006
1007 case FSF_STATUS_READ_CFDC_UPDATED:
1008 ZFCP_LOG_NORMAL("CFDC has been updated on the adapter %s\n",
1009 zfcp_get_busid_by_adapter(adapter));
1010 zfcp_erp_adapter_access_changed(adapter);
1011 break;
1012
1013 case FSF_STATUS_READ_CFDC_HARDENED:
1014 switch (status_buffer->status_subtype) {
1015 case FSF_STATUS_READ_SUB_CFDC_HARDENED_ON_SE:
1016 ZFCP_LOG_NORMAL("CFDC of adapter %s saved on SE\n",
1017 zfcp_get_busid_by_adapter(adapter));
1018 break;
1019 case FSF_STATUS_READ_SUB_CFDC_HARDENED_ON_SE2:
1020 ZFCP_LOG_NORMAL("CFDC of adapter %s has been copied "
1021 "to the secondary SE\n",
1022 zfcp_get_busid_by_adapter(adapter));
1023 break;
1024 default:
1025 ZFCP_LOG_NORMAL("CFDC of adapter %s has been hardened\n",
1026 zfcp_get_busid_by_adapter(adapter));
1027 }
1028 break;
1029
1030 case FSF_STATUS_READ_FEATURE_UPDATE_ALERT:
1031 debug_text_event(adapter->erp_dbf, 2, "unsol_features:");
1032 ZFCP_LOG_INFO("List of supported features on adapter %s has "
1033 "been changed from 0x%08X to 0x%08X\n",
1034 zfcp_get_busid_by_adapter(adapter),
1035 *(u32*) (status_buffer->payload + 4),
1036 *(u32*) (status_buffer->payload));
1037 adapter->adapter_features = *(u32*) status_buffer->payload;
1038 break;
1039
1040 default:
1041 ZFCP_LOG_NORMAL("warning: An unsolicited status packet of unknown "
1042 "type was received (debug info 0x%x)\n",
1043 status_buffer->status_type);
1044 ZFCP_LOG_DEBUG("Dump of status_read_buffer %p:\n",
1045 status_buffer);
1046 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
1047 (char *) status_buffer,
1048 sizeof (struct fsf_status_read_buffer));
1049 break;
1050 }
1051 mempool_free(status_buffer, adapter->pool.data_status_read);
1052 zfcp_fsf_req_free(fsf_req);
1053 /*
1054 * recycle buffer and start new request repeat until outbound
1055 * queue is empty or adapter shutdown is requested
1056 */
1057 /*
1058 * FIXME(qdio):
1059 * we may wait in the req_create for 5s during shutdown, so
1060 * qdio_cleanup will have to wait at least that long before returning
1061 * with failure to allow us a proper cleanup under all circumstances
1062 */
1063 /*
1064 * FIXME:
1065 * allocation failure possible? (Is this code needed?)
1066 */
1067 retval = zfcp_fsf_status_read(adapter, 0);
1068 if (retval < 0) {
1069 ZFCP_LOG_INFO("Failed to create unsolicited status read "
1070 "request for the adapter %s.\n",
1071 zfcp_get_busid_by_adapter(adapter));
1072 /* temporary fix to avoid status read buffer shortage */
1073 adapter->status_read_failed++;
1074 if ((ZFCP_STATUS_READS_RECOM - adapter->status_read_failed)
1075 < ZFCP_STATUS_READ_FAILED_THRESHOLD) {
1076 ZFCP_LOG_INFO("restart adapter %s due to status read "
1077 "buffer shortage\n",
1078 zfcp_get_busid_by_adapter(adapter));
1079 zfcp_erp_adapter_reopen(adapter, 0);
1080 }
1081 }
1082 out:
1083 return retval;
1084 }
1085
1086 /*
1087 * function: zfcp_fsf_abort_fcp_command
1088 *
1089 * purpose: tells FSF to abort a running SCSI command
1090 *
1091 * returns: address of initiated FSF request
1092 * NULL - request could not be initiated
1093 *
1094 * FIXME(design): should be watched by a timeout !!!
1095 * FIXME(design) shouldn't this be modified to return an int
1096 * also...don't know how though
1097 */
1098 struct zfcp_fsf_req *
1099 zfcp_fsf_abort_fcp_command(unsigned long old_req_id,
1100 struct zfcp_adapter *adapter,
1101 struct zfcp_unit *unit, int req_flags)
1102 {
1103 volatile struct qdio_buffer_element *sbale;
1104 unsigned long lock_flags;
1105 struct zfcp_fsf_req *fsf_req = NULL;
1106 int retval = 0;
1107
1108 /* setup new FSF request */
1109 retval = zfcp_fsf_req_create(adapter, FSF_QTCB_ABORT_FCP_CMND,
1110 req_flags, adapter->pool.fsf_req_abort,
1111 &lock_flags, &fsf_req);
1112 if (retval < 0) {
1113 ZFCP_LOG_INFO("error: Failed to create an abort command "
1114 "request for lun 0x%016Lx on port 0x%016Lx "
1115 "on adapter %s.\n",
1116 unit->fcp_lun,
1117 unit->port->wwpn,
1118 zfcp_get_busid_by_adapter(adapter));
1119 goto out;
1120 }
1121
1122 sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
1123 sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
1124 sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
1125
1126 fsf_req->data = (unsigned long) unit;
1127
1128 /* set handles of unit and its parent port in QTCB */
1129 fsf_req->qtcb->header.lun_handle = unit->handle;
1130 fsf_req->qtcb->header.port_handle = unit->port->handle;
1131
1132 /* set handle of request which should be aborted */
1133 fsf_req->qtcb->bottom.support.req_handle = (u64) old_req_id;
1134
1135 /* start QDIO request for this FSF request */
1136
1137 zfcp_fsf_start_scsi_er_timer(adapter);
1138 retval = zfcp_fsf_req_send(fsf_req, NULL);
1139 if (retval) {
1140 del_timer(&adapter->scsi_er_timer);
1141 ZFCP_LOG_INFO("error: Failed to send abort command request "
1142 "on adapter %s, port 0x%016Lx, unit 0x%016Lx\n",
1143 zfcp_get_busid_by_adapter(adapter),
1144 unit->port->wwpn, unit->fcp_lun);
1145 zfcp_fsf_req_free(fsf_req);
1146 fsf_req = NULL;
1147 goto out;
1148 }
1149
1150 ZFCP_LOG_DEBUG("Abort FCP Command request initiated "
1151 "(adapter%s, port d_id=0x%08x, "
1152 "unit x%016Lx, old_req_id=0x%lx)\n",
1153 zfcp_get_busid_by_adapter(adapter),
1154 unit->port->d_id,
1155 unit->fcp_lun, old_req_id);
1156 out:
1157 write_unlock_irqrestore(&adapter->request_queue.queue_lock, lock_flags);
1158 return fsf_req;
1159 }
1160
1161 /*
1162 * function: zfcp_fsf_abort_fcp_command_handler
1163 *
1164 * purpose: is called for finished Abort FCP Command request
1165 *
1166 * returns:
1167 */
1168 static int
1169 zfcp_fsf_abort_fcp_command_handler(struct zfcp_fsf_req *new_fsf_req)
1170 {
1171 int retval = -EINVAL;
1172 struct zfcp_unit *unit;
1173 unsigned char status_qual =
1174 new_fsf_req->qtcb->header.fsf_status_qual.word[0];
1175
1176 del_timer(&new_fsf_req->adapter->scsi_er_timer);
1177
1178 if (new_fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR) {
1179 /* do not set ZFCP_STATUS_FSFREQ_ABORTSUCCEEDED */
1180 goto skip_fsfstatus;
1181 }
1182
1183 unit = (struct zfcp_unit *) new_fsf_req->data;
1184
1185 /* evaluate FSF status in QTCB */
1186 switch (new_fsf_req->qtcb->header.fsf_status) {
1187
1188 case FSF_PORT_HANDLE_NOT_VALID:
1189 if (status_qual >> 4 != status_qual % 0xf) {
1190 debug_text_event(new_fsf_req->adapter->erp_dbf, 3,
1191 "fsf_s_phand_nv0");
1192 /*
1193 * In this case a command that was sent prior to a port
1194 * reopen was aborted (handles are different). This is
1195 * fine.
1196 */
1197 } else {
1198 ZFCP_LOG_INFO("Temporary port identifier 0x%x for "
1199 "port 0x%016Lx on adapter %s invalid. "
1200 "This may happen occasionally.\n",
1201 unit->port->handle,
1202 unit->port->wwpn,
1203 zfcp_get_busid_by_unit(unit));
1204 ZFCP_LOG_INFO("status qualifier:\n");
1205 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_INFO,
1206 (char *) &new_fsf_req->qtcb->header.
1207 fsf_status_qual,
1208 sizeof (union fsf_status_qual));
1209 /* Let's hope this sorts out the mess */
1210 debug_text_event(new_fsf_req->adapter->erp_dbf, 1,
1211 "fsf_s_phand_nv1");
1212 zfcp_erp_adapter_reopen(unit->port->adapter, 0);
1213 new_fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1214 }
1215 break;
1216
1217 case FSF_LUN_HANDLE_NOT_VALID:
1218 if (status_qual >> 4 != status_qual % 0xf) {
1219 /* 2 */
1220 debug_text_event(new_fsf_req->adapter->erp_dbf, 3,
1221 "fsf_s_lhand_nv0");
1222 /*
1223 * In this case a command that was sent prior to a unit
1224 * reopen was aborted (handles are different).
1225 * This is fine.
1226 */
1227 } else {
1228 ZFCP_LOG_INFO
1229 ("Warning: Temporary LUN identifier 0x%x of LUN "
1230 "0x%016Lx on port 0x%016Lx on adapter %s is "
1231 "invalid. This may happen in rare cases. "
1232 "Trying to re-establish link.\n",
1233 unit->handle,
1234 unit->fcp_lun,
1235 unit->port->wwpn,
1236 zfcp_get_busid_by_unit(unit));
1237 ZFCP_LOG_DEBUG("Status qualifier data:\n");
1238 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
1239 (char *) &new_fsf_req->qtcb->header.
1240 fsf_status_qual,
1241 sizeof (union fsf_status_qual));
1242 /* Let's hope this sorts out the mess */
1243 debug_text_event(new_fsf_req->adapter->erp_dbf, 1,
1244 "fsf_s_lhand_nv1");
1245 zfcp_erp_port_reopen(unit->port, 0);
1246 new_fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1247 }
1248 break;
1249
1250 case FSF_FCP_COMMAND_DOES_NOT_EXIST:
1251 retval = 0;
1252 debug_text_event(new_fsf_req->adapter->erp_dbf, 3,
1253 "fsf_s_no_exist");
1254 new_fsf_req->status |= ZFCP_STATUS_FSFREQ_ABORTNOTNEEDED;
1255 break;
1256
1257 case FSF_PORT_BOXED:
1258 ZFCP_LOG_INFO("Remote port 0x%016Lx on adapter %s needs to "
1259 "be reopened\n", unit->port->wwpn,
1260 zfcp_get_busid_by_unit(unit));
1261 debug_text_event(new_fsf_req->adapter->erp_dbf, 2,
1262 "fsf_s_pboxed");
1263 zfcp_erp_port_boxed(unit->port);
1264 new_fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR
1265 | ZFCP_STATUS_FSFREQ_RETRY;
1266 break;
1267
1268 case FSF_LUN_BOXED:
1269 ZFCP_LOG_INFO(
1270 "unit 0x%016Lx on port 0x%016Lx on adapter %s needs "
1271 "to be reopened\n",
1272 unit->fcp_lun, unit->port->wwpn,
1273 zfcp_get_busid_by_unit(unit));
1274 debug_text_event(new_fsf_req->adapter->erp_dbf, 1, "fsf_s_lboxed");
1275 zfcp_erp_unit_boxed(unit);
1276 new_fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR
1277 | ZFCP_STATUS_FSFREQ_RETRY;
1278 break;
1279
1280 case FSF_ADAPTER_STATUS_AVAILABLE:
1281 switch (new_fsf_req->qtcb->header.fsf_status_qual.word[0]) {
1282 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1283 debug_text_event(new_fsf_req->adapter->erp_dbf, 1,
1284 "fsf_sq_ltest");
1285 zfcp_test_link(unit->port);
1286 new_fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1287 break;
1288 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
1289 /* SCSI stack will escalate */
1290 debug_text_event(new_fsf_req->adapter->erp_dbf, 1,
1291 "fsf_sq_ulp");
1292 new_fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1293 break;
1294 default:
1295 ZFCP_LOG_NORMAL
1296 ("bug: Wrong status qualifier 0x%x arrived.\n",
1297 new_fsf_req->qtcb->header.fsf_status_qual.word[0]);
1298 debug_text_event(new_fsf_req->adapter->erp_dbf, 0,
1299 "fsf_sq_inval:");
1300 debug_exception(new_fsf_req->adapter->erp_dbf, 0,
1301 &new_fsf_req->qtcb->header.
1302 fsf_status_qual.word[0], sizeof (u32));
1303 break;
1304 }
1305 break;
1306
1307 case FSF_GOOD:
1308 retval = 0;
1309 new_fsf_req->status |= ZFCP_STATUS_FSFREQ_ABORTSUCCEEDED;
1310 break;
1311
1312 default:
1313 ZFCP_LOG_NORMAL("bug: An unknown FSF Status was presented "
1314 "(debug info 0x%x)\n",
1315 new_fsf_req->qtcb->header.fsf_status);
1316 debug_text_event(new_fsf_req->adapter->erp_dbf, 0,
1317 "fsf_s_inval:");
1318 debug_exception(new_fsf_req->adapter->erp_dbf, 0,
1319 &new_fsf_req->qtcb->header.fsf_status,
1320 sizeof (u32));
1321 break;
1322 }
1323 skip_fsfstatus:
1324 return retval;
1325 }
1326
1327 /**
1328 * zfcp_use_one_sbal - checks whether req buffer and resp bother each fit into
1329 * one SBALE
1330 * Two scatter-gather lists are passed, one for the reqeust and one for the
1331 * response.
1332 */
1333 static inline int
1334 zfcp_use_one_sbal(struct scatterlist *req, int req_count,
1335 struct scatterlist *resp, int resp_count)
1336 {
1337 return ((req_count == 1) &&
1338 (resp_count == 1) &&
1339 (((unsigned long) zfcp_sg_to_address(&req[0]) &
1340 PAGE_MASK) ==
1341 ((unsigned long) (zfcp_sg_to_address(&req[0]) +
1342 req[0].length - 1) & PAGE_MASK)) &&
1343 (((unsigned long) zfcp_sg_to_address(&resp[0]) &
1344 PAGE_MASK) ==
1345 ((unsigned long) (zfcp_sg_to_address(&resp[0]) +
1346 resp[0].length - 1) & PAGE_MASK)));
1347 }
1348
1349 /**
1350 * zfcp_fsf_send_ct - initiate a Generic Service request (FC-GS)
1351 * @ct: pointer to struct zfcp_send_ct which conatins all needed data for
1352 * the request
1353 * @pool: pointer to memory pool, if non-null this pool is used to allocate
1354 * a struct zfcp_fsf_req
1355 * @erp_action: pointer to erp_action, if non-null the Generic Service request
1356 * is sent within error recovery
1357 */
1358 int
1359 zfcp_fsf_send_ct(struct zfcp_send_ct *ct, mempool_t *pool,
1360 struct zfcp_erp_action *erp_action)
1361 {
1362 volatile struct qdio_buffer_element *sbale;
1363 struct zfcp_port *port;
1364 struct zfcp_adapter *adapter;
1365 struct zfcp_fsf_req *fsf_req;
1366 unsigned long lock_flags;
1367 int bytes;
1368 int ret = 0;
1369
1370 port = ct->port;
1371 adapter = port->adapter;
1372
1373 ret = zfcp_fsf_req_create(adapter, FSF_QTCB_SEND_GENERIC,
1374 ZFCP_WAIT_FOR_SBAL | ZFCP_REQ_AUTO_CLEANUP,
1375 pool, &lock_flags, &fsf_req);
1376 if (ret < 0) {
1377 ZFCP_LOG_INFO("error: Could not create CT request (FC-GS) for "
1378 "adapter: %s\n",
1379 zfcp_get_busid_by_adapter(adapter));
1380 goto failed_req;
1381 }
1382
1383 if (erp_action != NULL) {
1384 erp_action->fsf_req = fsf_req;
1385 fsf_req->erp_action = erp_action;
1386 }
1387
1388 sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
1389 if (zfcp_use_one_sbal(ct->req, ct->req_count,
1390 ct->resp, ct->resp_count)){
1391 /* both request buffer and response buffer
1392 fit into one sbale each */
1393 sbale[0].flags |= SBAL_FLAGS0_TYPE_WRITE_READ;
1394 sbale[2].addr = zfcp_sg_to_address(&ct->req[0]);
1395 sbale[2].length = ct->req[0].length;
1396 sbale[3].addr = zfcp_sg_to_address(&ct->resp[0]);
1397 sbale[3].length = ct->resp[0].length;
1398 sbale[3].flags |= SBAL_FLAGS_LAST_ENTRY;
1399 } else if (adapter->adapter_features &
1400 FSF_FEATURE_ELS_CT_CHAINED_SBALS) {
1401 /* try to use chained SBALs */
1402 bytes = zfcp_qdio_sbals_from_sg(fsf_req,
1403 SBAL_FLAGS0_TYPE_WRITE_READ,
1404 ct->req, ct->req_count,
1405 ZFCP_MAX_SBALS_PER_CT_REQ);
1406 if (bytes <= 0) {
1407 ZFCP_LOG_INFO("error: creation of CT request failed "
1408 "on adapter %s\n",
1409 zfcp_get_busid_by_adapter(adapter));
1410 if (bytes == 0)
1411 ret = -ENOMEM;
1412 else
1413 ret = bytes;
1414
1415 goto failed_send;
1416 }
1417 fsf_req->qtcb->bottom.support.req_buf_length = bytes;
1418 fsf_req->sbale_curr = ZFCP_LAST_SBALE_PER_SBAL;
1419 bytes = zfcp_qdio_sbals_from_sg(fsf_req,
1420 SBAL_FLAGS0_TYPE_WRITE_READ,
1421 ct->resp, ct->resp_count,
1422 ZFCP_MAX_SBALS_PER_CT_REQ);
1423 if (bytes <= 0) {
1424 ZFCP_LOG_INFO("error: creation of CT request failed "
1425 "on adapter %s\n",
1426 zfcp_get_busid_by_adapter(adapter));
1427 if (bytes == 0)
1428 ret = -ENOMEM;
1429 else
1430 ret = bytes;
1431
1432 goto failed_send;
1433 }
1434 fsf_req->qtcb->bottom.support.resp_buf_length = bytes;
1435 } else {
1436 /* reject send generic request */
1437 ZFCP_LOG_INFO(
1438 "error: microcode does not support chained SBALs,"
1439 "CT request too big (adapter %s)\n",
1440 zfcp_get_busid_by_adapter(adapter));
1441 ret = -EOPNOTSUPP;
1442 goto failed_send;
1443 }
1444
1445 /* settings in QTCB */
1446 fsf_req->qtcb->header.port_handle = port->handle;
1447 fsf_req->qtcb->bottom.support.service_class =
1448 ZFCP_FC_SERVICE_CLASS_DEFAULT;
1449 fsf_req->qtcb->bottom.support.timeout = ct->timeout;
1450 fsf_req->data = (unsigned long) ct;
1451
1452 zfcp_san_dbf_event_ct_request(fsf_req);
1453
1454 /* start QDIO request for this FSF request */
1455 ret = zfcp_fsf_req_send(fsf_req, ct->timer);
1456 if (ret) {
1457 ZFCP_LOG_DEBUG("error: initiation of CT request failed "
1458 "(adapter %s, port 0x%016Lx)\n",
1459 zfcp_get_busid_by_adapter(adapter), port->wwpn);
1460 goto failed_send;
1461 }
1462
1463 ZFCP_LOG_DEBUG("CT request initiated (adapter %s, port 0x%016Lx)\n",
1464 zfcp_get_busid_by_adapter(adapter), port->wwpn);
1465 goto out;
1466
1467 failed_send:
1468 zfcp_fsf_req_free(fsf_req);
1469 if (erp_action != NULL) {
1470 erp_action->fsf_req = NULL;
1471 }
1472 failed_req:
1473 out:
1474 write_unlock_irqrestore(&adapter->request_queue.queue_lock,
1475 lock_flags);
1476 return ret;
1477 }
1478
1479 /**
1480 * zfcp_fsf_send_ct_handler - handler for Generic Service requests
1481 * @fsf_req: pointer to struct zfcp_fsf_req
1482 *
1483 * Data specific for the Generic Service request is passed using
1484 * fsf_req->data. There we find the pointer to struct zfcp_send_ct.
1485 * Usually a specific handler for the CT request is called which is
1486 * found in this structure.
1487 */
1488 static int
1489 zfcp_fsf_send_ct_handler(struct zfcp_fsf_req *fsf_req)
1490 {
1491 struct zfcp_port *port;
1492 struct zfcp_adapter *adapter;
1493 struct zfcp_send_ct *send_ct;
1494 struct fsf_qtcb_header *header;
1495 struct fsf_qtcb_bottom_support *bottom;
1496 int retval = -EINVAL;
1497 u16 subtable, rule, counter;
1498
1499 adapter = fsf_req->adapter;
1500 send_ct = (struct zfcp_send_ct *) fsf_req->data;
1501 port = send_ct->port;
1502 header = &fsf_req->qtcb->header;
1503 bottom = &fsf_req->qtcb->bottom.support;
1504
1505 if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR)
1506 goto skip_fsfstatus;
1507
1508 /* evaluate FSF status in QTCB */
1509 switch (header->fsf_status) {
1510
1511 case FSF_GOOD:
1512 zfcp_san_dbf_event_ct_response(fsf_req);
1513 retval = 0;
1514 break;
1515
1516 case FSF_SERVICE_CLASS_NOT_SUPPORTED:
1517 ZFCP_LOG_INFO("error: adapter %s does not support fc "
1518 "class %d.\n",
1519 zfcp_get_busid_by_port(port),
1520 ZFCP_FC_SERVICE_CLASS_DEFAULT);
1521 /* stop operation for this adapter */
1522 debug_text_exception(adapter->erp_dbf, 0, "fsf_s_class_nsup");
1523 zfcp_erp_adapter_shutdown(adapter, 0);
1524 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1525 break;
1526
1527 case FSF_ADAPTER_STATUS_AVAILABLE:
1528 switch (header->fsf_status_qual.word[0]){
1529 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1530 /* reopening link to port */
1531 debug_text_event(adapter->erp_dbf, 1, "fsf_sq_ltest");
1532 zfcp_test_link(port);
1533 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1534 break;
1535 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
1536 /* ERP strategy will escalate */
1537 debug_text_event(adapter->erp_dbf, 1, "fsf_sq_ulp");
1538 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1539 break;
1540 default:
1541 ZFCP_LOG_INFO("bug: Wrong status qualifier 0x%x "
1542 "arrived.\n",
1543 header->fsf_status_qual.word[0]);
1544 break;
1545 }
1546 break;
1547
1548 case FSF_ACCESS_DENIED:
1549 ZFCP_LOG_NORMAL("access denied, cannot send generic service "
1550 "command (adapter %s, port d_id=0x%08x)\n",
1551 zfcp_get_busid_by_port(port), port->d_id);
1552 for (counter = 0; counter < 2; counter++) {
1553 subtable = header->fsf_status_qual.halfword[counter * 2];
1554 rule = header->fsf_status_qual.halfword[counter * 2 + 1];
1555 switch (subtable) {
1556 case FSF_SQ_CFDC_SUBTABLE_OS:
1557 case FSF_SQ_CFDC_SUBTABLE_PORT_WWPN:
1558 case FSF_SQ_CFDC_SUBTABLE_PORT_DID:
1559 case FSF_SQ_CFDC_SUBTABLE_LUN:
1560 ZFCP_LOG_INFO("Access denied (%s rule %d)\n",
1561 zfcp_act_subtable_type[subtable], rule);
1562 break;
1563 }
1564 }
1565 debug_text_event(adapter->erp_dbf, 1, "fsf_s_access");
1566 zfcp_erp_port_access_denied(port);
1567 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1568 break;
1569
1570 case FSF_GENERIC_COMMAND_REJECTED:
1571 ZFCP_LOG_INFO("generic service command rejected "
1572 "(adapter %s, port d_id=0x%08x)\n",
1573 zfcp_get_busid_by_port(port), port->d_id);
1574 ZFCP_LOG_INFO("status qualifier:\n");
1575 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_INFO,
1576 (char *) &header->fsf_status_qual,
1577 sizeof (union fsf_status_qual));
1578 debug_text_event(adapter->erp_dbf, 1, "fsf_s_gcom_rej");
1579 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1580 break;
1581
1582 case FSF_PORT_HANDLE_NOT_VALID:
1583 ZFCP_LOG_DEBUG("Temporary port identifier 0x%x for port "
1584 "0x%016Lx on adapter %s invalid. This may "
1585 "happen occasionally.\n", port->handle,
1586 port->wwpn, zfcp_get_busid_by_port(port));
1587 ZFCP_LOG_INFO("status qualifier:\n");
1588 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_INFO,
1589 (char *) &header->fsf_status_qual,
1590 sizeof (union fsf_status_qual));
1591 debug_text_event(adapter->erp_dbf, 1, "fsf_s_phandle_nv");
1592 zfcp_erp_adapter_reopen(adapter, 0);
1593 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1594 break;
1595
1596 case FSF_PORT_BOXED:
1597 ZFCP_LOG_INFO("port needs to be reopened "
1598 "(adapter %s, port d_id=0x%08x)\n",
1599 zfcp_get_busid_by_port(port), port->d_id);
1600 debug_text_event(adapter->erp_dbf, 2, "fsf_s_pboxed");
1601 zfcp_erp_port_boxed(port);
1602 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR
1603 | ZFCP_STATUS_FSFREQ_RETRY;
1604 break;
1605
1606 /* following states should never occure, all cases avoided
1607 in zfcp_fsf_send_ct - but who knows ... */
1608 case FSF_PAYLOAD_SIZE_MISMATCH:
1609 ZFCP_LOG_INFO("payload size mismatch (adapter: %s, "
1610 "req_buf_length=%d, resp_buf_length=%d)\n",
1611 zfcp_get_busid_by_adapter(adapter),
1612 bottom->req_buf_length, bottom->resp_buf_length);
1613 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1614 break;
1615 case FSF_REQUEST_SIZE_TOO_LARGE:
1616 ZFCP_LOG_INFO("request size too large (adapter: %s, "
1617 "req_buf_length=%d)\n",
1618 zfcp_get_busid_by_adapter(adapter),
1619 bottom->req_buf_length);
1620 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1621 break;
1622 case FSF_RESPONSE_SIZE_TOO_LARGE:
1623 ZFCP_LOG_INFO("response size too large (adapter: %s, "
1624 "resp_buf_length=%d)\n",
1625 zfcp_get_busid_by_adapter(adapter),
1626 bottom->resp_buf_length);
1627 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1628 break;
1629 case FSF_SBAL_MISMATCH:
1630 ZFCP_LOG_INFO("SBAL mismatch (adapter: %s, req_buf_length=%d, "
1631 "resp_buf_length=%d)\n",
1632 zfcp_get_busid_by_adapter(adapter),
1633 bottom->req_buf_length, bottom->resp_buf_length);
1634 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1635 break;
1636
1637 default:
1638 ZFCP_LOG_NORMAL("bug: An unknown FSF Status was presented "
1639 "(debug info 0x%x)\n", header->fsf_status);
1640 debug_text_event(adapter->erp_dbf, 0, "fsf_sq_inval:");
1641 debug_exception(adapter->erp_dbf, 0,
1642 &header->fsf_status_qual.word[0], sizeof (u32));
1643 break;
1644 }
1645
1646 skip_fsfstatus:
1647 send_ct->status = retval;
1648
1649 if (send_ct->handler != NULL)
1650 send_ct->handler(send_ct->handler_data);
1651
1652 return retval;
1653 }
1654
1655 /**
1656 * zfcp_fsf_send_els - initiate an ELS command (FC-FS)
1657 * @els: pointer to struct zfcp_send_els which contains all needed data for
1658 * the command.
1659 */
1660 int
1661 zfcp_fsf_send_els(struct zfcp_send_els *els)
1662 {
1663 volatile struct qdio_buffer_element *sbale;
1664 struct zfcp_fsf_req *fsf_req;
1665 u32 d_id;
1666 struct zfcp_adapter *adapter;
1667 unsigned long lock_flags;
1668 int bytes;
1669 int ret = 0;
1670
1671 d_id = els->d_id;
1672 adapter = els->adapter;
1673
1674 ret = zfcp_fsf_req_create(adapter, FSF_QTCB_SEND_ELS,
1675 ZFCP_REQ_AUTO_CLEANUP,
1676 NULL, &lock_flags, &fsf_req);
1677 if (ret < 0) {
1678 ZFCP_LOG_INFO("error: creation of ELS request failed "
1679 "(adapter %s, port d_id: 0x%08x)\n",
1680 zfcp_get_busid_by_adapter(adapter), d_id);
1681 goto failed_req;
1682 }
1683
1684 sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
1685 if (zfcp_use_one_sbal(els->req, els->req_count,
1686 els->resp, els->resp_count)){
1687 /* both request buffer and response buffer
1688 fit into one sbale each */
1689 sbale[0].flags |= SBAL_FLAGS0_TYPE_WRITE_READ;
1690 sbale[2].addr = zfcp_sg_to_address(&els->req[0]);
1691 sbale[2].length = els->req[0].length;
1692 sbale[3].addr = zfcp_sg_to_address(&els->resp[0]);
1693 sbale[3].length = els->resp[0].length;
1694 sbale[3].flags |= SBAL_FLAGS_LAST_ENTRY;
1695 } else if (adapter->adapter_features &
1696 FSF_FEATURE_ELS_CT_CHAINED_SBALS) {
1697 /* try to use chained SBALs */
1698 bytes = zfcp_qdio_sbals_from_sg(fsf_req,
1699 SBAL_FLAGS0_TYPE_WRITE_READ,
1700 els->req, els->req_count,
1701 ZFCP_MAX_SBALS_PER_ELS_REQ);
1702 if (bytes <= 0) {
1703 ZFCP_LOG_INFO("error: creation of ELS request failed "
1704 "(adapter %s, port d_id: 0x%08x)\n",
1705 zfcp_get_busid_by_adapter(adapter), d_id);
1706 if (bytes == 0) {
1707 ret = -ENOMEM;
1708 } else {
1709 ret = bytes;
1710 }
1711 goto failed_send;
1712 }
1713 fsf_req->qtcb->bottom.support.req_buf_length = bytes;
1714 fsf_req->sbale_curr = ZFCP_LAST_SBALE_PER_SBAL;
1715 bytes = zfcp_qdio_sbals_from_sg(fsf_req,
1716 SBAL_FLAGS0_TYPE_WRITE_READ,
1717 els->resp, els->resp_count,
1718 ZFCP_MAX_SBALS_PER_ELS_REQ);
1719 if (bytes <= 0) {
1720 ZFCP_LOG_INFO("error: creation of ELS request failed "
1721 "(adapter %s, port d_id: 0x%08x)\n",
1722 zfcp_get_busid_by_adapter(adapter), d_id);
1723 if (bytes == 0) {
1724 ret = -ENOMEM;
1725 } else {
1726 ret = bytes;
1727 }
1728 goto failed_send;
1729 }
1730 fsf_req->qtcb->bottom.support.resp_buf_length = bytes;
1731 } else {
1732 /* reject request */
1733 ZFCP_LOG_INFO("error: microcode does not support chained SBALs"
1734 ", ELS request too big (adapter %s, "
1735 "port d_id: 0x%08x)\n",
1736 zfcp_get_busid_by_adapter(adapter), d_id);
1737 ret = -EOPNOTSUPP;
1738 goto failed_send;
1739 }
1740
1741 /* settings in QTCB */
1742 fsf_req->qtcb->bottom.support.d_id = d_id;
1743 fsf_req->qtcb->bottom.support.service_class =
1744 ZFCP_FC_SERVICE_CLASS_DEFAULT;
1745 fsf_req->qtcb->bottom.support.timeout = ZFCP_ELS_TIMEOUT;
1746 fsf_req->data = (unsigned long) els;
1747
1748 sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
1749
1750 zfcp_san_dbf_event_els_request(fsf_req);
1751
1752 /* start QDIO request for this FSF request */
1753 ret = zfcp_fsf_req_send(fsf_req, els->timer);
1754 if (ret) {
1755 ZFCP_LOG_DEBUG("error: initiation of ELS request failed "
1756 "(adapter %s, port d_id: 0x%08x)\n",
1757 zfcp_get_busid_by_adapter(adapter), d_id);
1758 goto failed_send;
1759 }
1760
1761 ZFCP_LOG_DEBUG("ELS request initiated (adapter %s, port d_id: "
1762 "0x%08x)\n", zfcp_get_busid_by_adapter(adapter), d_id);
1763 goto out;
1764
1765 failed_send:
1766 zfcp_fsf_req_free(fsf_req);
1767
1768 failed_req:
1769 out:
1770 write_unlock_irqrestore(&adapter->request_queue.queue_lock,
1771 lock_flags);
1772
1773 return ret;
1774 }
1775
1776 /**
1777 * zfcp_fsf_send_els_handler - handler for ELS commands
1778 * @fsf_req: pointer to struct zfcp_fsf_req
1779 *
1780 * Data specific for the ELS command is passed using
1781 * fsf_req->data. There we find the pointer to struct zfcp_send_els.
1782 * Usually a specific handler for the ELS command is called which is
1783 * found in this structure.
1784 */
1785 static int zfcp_fsf_send_els_handler(struct zfcp_fsf_req *fsf_req)
1786 {
1787 struct zfcp_adapter *adapter;
1788 struct zfcp_port *port;
1789 u32 d_id;
1790 struct fsf_qtcb_header *header;
1791 struct fsf_qtcb_bottom_support *bottom;
1792 struct zfcp_send_els *send_els;
1793 int retval = -EINVAL;
1794 u16 subtable, rule, counter;
1795
1796 send_els = (struct zfcp_send_els *) fsf_req->data;
1797 adapter = send_els->adapter;
1798 port = send_els->port;
1799 d_id = send_els->d_id;
1800 header = &fsf_req->qtcb->header;
1801 bottom = &fsf_req->qtcb->bottom.support;
1802
1803 if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR)
1804 goto skip_fsfstatus;
1805
1806 switch (header->fsf_status) {
1807
1808 case FSF_GOOD:
1809 zfcp_san_dbf_event_els_response(fsf_req);
1810 retval = 0;
1811 break;
1812
1813 case FSF_SERVICE_CLASS_NOT_SUPPORTED:
1814 ZFCP_LOG_INFO("error: adapter %s does not support fc "
1815 "class %d.\n",
1816 zfcp_get_busid_by_adapter(adapter),
1817 ZFCP_FC_SERVICE_CLASS_DEFAULT);
1818 /* stop operation for this adapter */
1819 debug_text_exception(adapter->erp_dbf, 0, "fsf_s_class_nsup");
1820 zfcp_erp_adapter_shutdown(adapter, 0);
1821 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1822 break;
1823
1824 case FSF_ADAPTER_STATUS_AVAILABLE:
1825 switch (header->fsf_status_qual.word[0]){
1826 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1827 debug_text_event(adapter->erp_dbf, 1, "fsf_sq_ltest");
1828 if (port && (send_els->ls_code != ZFCP_LS_ADISC))
1829 zfcp_test_link(port);
1830 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1831 break;
1832 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
1833 debug_text_event(adapter->erp_dbf, 1, "fsf_sq_ulp");
1834 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1835 retval =
1836 zfcp_handle_els_rjt(header->fsf_status_qual.word[1],
1837 (struct zfcp_ls_rjt_par *)
1838 &header->fsf_status_qual.word[2]);
1839 break;
1840 case FSF_SQ_RETRY_IF_POSSIBLE:
1841 debug_text_event(adapter->erp_dbf, 1, "fsf_sq_retry");
1842 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1843 break;
1844 default:
1845 ZFCP_LOG_INFO("bug: Wrong status qualifier 0x%x\n",
1846 header->fsf_status_qual.word[0]);
1847 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_INFO,
1848 (char*)header->fsf_status_qual.word, 16);
1849 }
1850 break;
1851
1852 case FSF_ELS_COMMAND_REJECTED:
1853 ZFCP_LOG_INFO("ELS has been rejected because command filter "
1854 "prohibited sending "
1855 "(adapter: %s, port d_id: 0x%08x)\n",
1856 zfcp_get_busid_by_adapter(adapter), d_id);
1857
1858 break;
1859
1860 case FSF_PAYLOAD_SIZE_MISMATCH:
1861 ZFCP_LOG_INFO(
1862 "ELS request size and ELS response size must be either "
1863 "both 0, or both greater than 0 "
1864 "(adapter: %s, req_buf_length=%d resp_buf_length=%d)\n",
1865 zfcp_get_busid_by_adapter(adapter),
1866 bottom->req_buf_length,
1867 bottom->resp_buf_length);
1868 break;
1869
1870 case FSF_REQUEST_SIZE_TOO_LARGE:
1871 ZFCP_LOG_INFO(
1872 "Length of the ELS request buffer, "
1873 "specified in QTCB bottom, "
1874 "exceeds the size of the buffers "
1875 "that have been allocated for ELS request data "
1876 "(adapter: %s, req_buf_length=%d)\n",
1877 zfcp_get_busid_by_adapter(adapter),
1878 bottom->req_buf_length);
1879 break;
1880
1881 case FSF_RESPONSE_SIZE_TOO_LARGE:
1882 ZFCP_LOG_INFO(
1883 "Length of the ELS response buffer, "
1884 "specified in QTCB bottom, "
1885 "exceeds the size of the buffers "
1886 "that have been allocated for ELS response data "
1887 "(adapter: %s, resp_buf_length=%d)\n",
1888 zfcp_get_busid_by_adapter(adapter),
1889 bottom->resp_buf_length);
1890 break;
1891
1892 case FSF_SBAL_MISMATCH:
1893 /* should never occure, avoided in zfcp_fsf_send_els */
1894 ZFCP_LOG_INFO("SBAL mismatch (adapter: %s, req_buf_length=%d, "
1895 "resp_buf_length=%d)\n",
1896 zfcp_get_busid_by_adapter(adapter),
1897 bottom->req_buf_length, bottom->resp_buf_length);
1898 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1899 break;
1900
1901 case FSF_ACCESS_DENIED:
1902 ZFCP_LOG_NORMAL("access denied, cannot send ELS command "
1903 "(adapter %s, port d_id=0x%08x)\n",
1904 zfcp_get_busid_by_adapter(adapter), d_id);
1905 for (counter = 0; counter < 2; counter++) {
1906 subtable = header->fsf_status_qual.halfword[counter * 2];
1907 rule = header->fsf_status_qual.halfword[counter * 2 + 1];
1908 switch (subtable) {
1909 case FSF_SQ_CFDC_SUBTABLE_OS:
1910 case FSF_SQ_CFDC_SUBTABLE_PORT_WWPN:
1911 case FSF_SQ_CFDC_SUBTABLE_PORT_DID:
1912 case FSF_SQ_CFDC_SUBTABLE_LUN:
1913 ZFCP_LOG_INFO("Access denied (%s rule %d)\n",
1914 zfcp_act_subtable_type[subtable], rule);
1915 break;
1916 }
1917 }
1918 debug_text_event(adapter->erp_dbf, 1, "fsf_s_access");
1919 if (port != NULL)
1920 zfcp_erp_port_access_denied(port);
1921 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1922 break;
1923
1924 default:
1925 ZFCP_LOG_NORMAL(
1926 "bug: An unknown FSF Status was presented "
1927 "(adapter: %s, fsf_status=0x%08x)\n",
1928 zfcp_get_busid_by_adapter(adapter),
1929 header->fsf_status);
1930 debug_text_event(adapter->erp_dbf, 0, "fsf_sq_inval");
1931 debug_exception(adapter->erp_dbf, 0,
1932 &header->fsf_status_qual.word[0], sizeof(u32));
1933 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1934 break;
1935 }
1936
1937 skip_fsfstatus:
1938 send_els->status = retval;
1939
1940 if (send_els->handler != 0)
1941 send_els->handler(send_els->handler_data);
1942
1943 return retval;
1944 }
1945
1946 int
1947 zfcp_fsf_exchange_config_data(struct zfcp_erp_action *erp_action)
1948 {
1949 volatile struct qdio_buffer_element *sbale;
1950 unsigned long lock_flags;
1951 int retval = 0;
1952
1953 /* setup new FSF request */
1954 retval = zfcp_fsf_req_create(erp_action->adapter,
1955 FSF_QTCB_EXCHANGE_CONFIG_DATA,
1956 ZFCP_REQ_AUTO_CLEANUP,
1957 erp_action->adapter->pool.fsf_req_erp,
1958 &lock_flags, &(erp_action->fsf_req));
1959 if (retval < 0) {
1960 ZFCP_LOG_INFO("error: Could not create exchange configuration "
1961 "data request for adapter %s.\n",
1962 zfcp_get_busid_by_adapter(erp_action->adapter));
1963 goto out;
1964 }
1965
1966 sbale = zfcp_qdio_sbale_req(erp_action->fsf_req,
1967 erp_action->fsf_req->sbal_curr, 0);
1968 sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
1969 sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
1970
1971 erp_action->fsf_req->erp_action = erp_action;
1972 erp_action->fsf_req->qtcb->bottom.config.feature_selection =
1973 FSF_FEATURE_CFDC |
1974 FSF_FEATURE_LUN_SHARING |
1975 FSF_FEATURE_NOTIFICATION_LOST |
1976 FSF_FEATURE_UPDATE_ALERT;
1977
1978 /* start QDIO request for this FSF request */
1979 retval = zfcp_fsf_req_send(erp_action->fsf_req, &erp_action->timer);
1980 if (retval) {
1981 ZFCP_LOG_INFO
1982 ("error: Could not send exchange configuration data "
1983 "command on the adapter %s\n",
1984 zfcp_get_busid_by_adapter(erp_action->adapter));
1985 zfcp_fsf_req_free(erp_action->fsf_req);
1986 erp_action->fsf_req = NULL;
1987 goto out;
1988 }
1989
1990 ZFCP_LOG_DEBUG("exchange configuration data request initiated "
1991 "(adapter %s)\n",
1992 zfcp_get_busid_by_adapter(erp_action->adapter));
1993
1994 out:
1995 write_unlock_irqrestore(&erp_action->adapter->request_queue.queue_lock,
1996 lock_flags);
1997 return retval;
1998 }
1999
2000 /**
2001 * zfcp_fsf_exchange_config_evaluate
2002 * @fsf_req: fsf_req which belongs to xchg config data request
2003 * @xchg_ok: specifies if xchg config data was incomplete or complete (0/1)
2004 *
2005 * returns: -EIO on error, 0 otherwise
2006 */
2007 static int
2008 zfcp_fsf_exchange_config_evaluate(struct zfcp_fsf_req *fsf_req, int xchg_ok)
2009 {
2010 struct fsf_qtcb_bottom_config *bottom;
2011 struct zfcp_adapter *adapter = fsf_req->adapter;
2012 struct Scsi_Host *shost = adapter->scsi_host;
2013
2014 bottom = &fsf_req->qtcb->bottom.config;
2015 ZFCP_LOG_DEBUG("low/high QTCB version 0x%x/0x%x of FSF\n",
2016 bottom->low_qtcb_version, bottom->high_qtcb_version);
2017 adapter->fsf_lic_version = bottom->lic_version;
2018 adapter->adapter_features = bottom->adapter_features;
2019 adapter->connection_features = bottom->connection_features;
2020 adapter->peer_wwpn = 0;
2021 adapter->peer_wwnn = 0;
2022 adapter->peer_d_id = 0;
2023
2024 if (xchg_ok) {
2025 fc_host_node_name(shost) = bottom->nport_serv_param.wwnn;
2026 fc_host_port_name(shost) = bottom->nport_serv_param.wwpn;
2027 fc_host_port_id(shost) = bottom->s_id & ZFCP_DID_MASK;
2028 fc_host_speed(shost) = bottom->fc_link_speed;
2029 fc_host_supported_classes(shost) = FC_COS_CLASS2 | FC_COS_CLASS3;
2030 adapter->hydra_version = bottom->adapter_type;
2031 if (fc_host_permanent_port_name(shost) == -1)
2032 fc_host_permanent_port_name(shost) =
2033 fc_host_port_name(shost);
2034 if (bottom->fc_topology == FSF_TOPO_P2P) {
2035 adapter->peer_d_id = bottom->peer_d_id & ZFCP_DID_MASK;
2036 adapter->peer_wwpn = bottom->plogi_payload.wwpn;
2037 adapter->peer_wwnn = bottom->plogi_payload.wwnn;
2038 fc_host_port_type(shost) = FC_PORTTYPE_PTP;
2039 } else if (bottom->fc_topology == FSF_TOPO_FABRIC)
2040 fc_host_port_type(shost) = FC_PORTTYPE_NPORT;
2041 else if (bottom->fc_topology == FSF_TOPO_AL)
2042 fc_host_port_type(shost) = FC_PORTTYPE_NLPORT;
2043 else
2044 fc_host_port_type(shost) = FC_PORTTYPE_UNKNOWN;
2045 } else {
2046 fc_host_node_name(shost) = 0;
2047 fc_host_port_name(shost) = 0;
2048 fc_host_port_id(shost) = 0;
2049 fc_host_speed(shost) = FC_PORTSPEED_UNKNOWN;
2050 fc_host_port_type(shost) = FC_PORTTYPE_UNKNOWN;
2051 adapter->hydra_version = 0;
2052 }
2053
2054 if (adapter->adapter_features & FSF_FEATURE_HBAAPI_MANAGEMENT) {
2055 adapter->hardware_version = bottom->hardware_version;
2056 memcpy(fc_host_serial_number(shost), bottom->serial_number,
2057 min(FC_SERIAL_NUMBER_SIZE, 17));
2058 EBCASC(fc_host_serial_number(shost),
2059 min(FC_SERIAL_NUMBER_SIZE, 17));
2060 }
2061
2062 ZFCP_LOG_NORMAL("The adapter %s reported the following characteristics:\n"
2063 "WWNN 0x%016Lx, "
2064 "WWPN 0x%016Lx, "
2065 "S_ID 0x%08x,\n"
2066 "adapter version 0x%x, "
2067 "LIC version 0x%x, "
2068 "FC link speed %d Gb/s\n",
2069 zfcp_get_busid_by_adapter(adapter),
2070 (wwn_t) fc_host_node_name(shost),
2071 (wwn_t) fc_host_port_name(shost),
2072 fc_host_port_id(shost),
2073 adapter->hydra_version,
2074 adapter->fsf_lic_version,
2075 fc_host_speed(shost));
2076 if (ZFCP_QTCB_VERSION < bottom->low_qtcb_version) {
2077 ZFCP_LOG_NORMAL("error: the adapter %s "
2078 "only supports newer control block "
2079 "versions in comparison to this device "
2080 "driver (try updated device driver)\n",
2081 zfcp_get_busid_by_adapter(adapter));
2082 debug_text_event(adapter->erp_dbf, 0, "low_qtcb_ver");
2083 zfcp_erp_adapter_shutdown(adapter, 0);
2084 return -EIO;
2085 }
2086 if (ZFCP_QTCB_VERSION > bottom->high_qtcb_version) {
2087 ZFCP_LOG_NORMAL("error: the adapter %s "
2088 "only supports older control block "
2089 "versions than this device driver uses"
2090 "(consider a microcode upgrade)\n",
2091 zfcp_get_busid_by_adapter(adapter));
2092 debug_text_event(adapter->erp_dbf, 0, "high_qtcb_ver");
2093 zfcp_erp_adapter_shutdown(adapter, 0);
2094 return -EIO;
2095 }
2096 return 0;
2097 }
2098
2099 /*
2100 * function: zfcp_fsf_exchange_config_data_handler
2101 *
2102 * purpose: is called for finished Exchange Configuration Data command
2103 *
2104 * returns:
2105 */
2106 static int
2107 zfcp_fsf_exchange_config_data_handler(struct zfcp_fsf_req *fsf_req)
2108 {
2109 struct fsf_qtcb_bottom_config *bottom;
2110 struct zfcp_adapter *adapter = fsf_req->adapter;
2111 struct fsf_qtcb *qtcb = fsf_req->qtcb;
2112
2113 if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR)
2114 return -EIO;
2115
2116 switch (qtcb->header.fsf_status) {
2117
2118 case FSF_GOOD:
2119 if (zfcp_fsf_exchange_config_evaluate(fsf_req, 1))
2120 return -EIO;
2121
2122 switch (fc_host_port_type(adapter->scsi_host)) {
2123 case FC_PORTTYPE_PTP:
2124 ZFCP_LOG_NORMAL("Point-to-Point fibrechannel "
2125 "configuration detected at adapter %s\n"
2126 "Peer WWNN 0x%016llx, "
2127 "peer WWPN 0x%016llx, "
2128 "peer d_id 0x%06x\n",
2129 zfcp_get_busid_by_adapter(adapter),
2130 adapter->peer_wwnn,
2131 adapter->peer_wwpn,
2132 adapter->peer_d_id);
2133 debug_text_event(fsf_req->adapter->erp_dbf, 0,
2134 "top-p-to-p");
2135 break;
2136 case FC_PORTTYPE_NLPORT:
2137 ZFCP_LOG_NORMAL("error: Arbitrated loop fibrechannel "
2138 "topology detected at adapter %s "
2139 "unsupported, shutting down adapter\n",
2140 zfcp_get_busid_by_adapter(adapter));
2141 debug_text_event(fsf_req->adapter->erp_dbf, 0,
2142 "top-al");
2143 zfcp_erp_adapter_shutdown(adapter, 0);
2144 return -EIO;
2145 case FC_PORTTYPE_NPORT:
2146 ZFCP_LOG_NORMAL("Switched fabric fibrechannel "
2147 "network detected at adapter %s.\n",
2148 zfcp_get_busid_by_adapter(adapter));
2149 break;
2150 default:
2151 ZFCP_LOG_NORMAL("bug: The fibrechannel topology "
2152 "reported by the exchange "
2153 "configuration command for "
2154 "the adapter %s is not "
2155 "of a type known to the zfcp "
2156 "driver, shutting down adapter\n",
2157 zfcp_get_busid_by_adapter(adapter));
2158 debug_text_exception(fsf_req->adapter->erp_dbf, 0,
2159 "unknown-topo");
2160 zfcp_erp_adapter_shutdown(adapter, 0);
2161 return -EIO;
2162 }
2163 bottom = &qtcb->bottom.config;
2164 if (bottom->max_qtcb_size < sizeof(struct fsf_qtcb)) {
2165 ZFCP_LOG_NORMAL("bug: Maximum QTCB size (%d bytes) "
2166 "allowed by the adapter %s "
2167 "is lower than the minimum "
2168 "required by the driver (%ld bytes).\n",
2169 bottom->max_qtcb_size,
2170 zfcp_get_busid_by_adapter(adapter),
2171 sizeof(struct fsf_qtcb));
2172 debug_text_event(fsf_req->adapter->erp_dbf, 0,
2173 "qtcb-size");
2174 debug_event(fsf_req->adapter->erp_dbf, 0,
2175 &bottom->max_qtcb_size, sizeof (u32));
2176 zfcp_erp_adapter_shutdown(adapter, 0);
2177 return -EIO;
2178 }
2179 atomic_set_mask(ZFCP_STATUS_ADAPTER_XCONFIG_OK,
2180 &adapter->status);
2181 break;
2182 case FSF_EXCHANGE_CONFIG_DATA_INCOMPLETE:
2183 debug_text_event(adapter->erp_dbf, 0, "xchg-inco");
2184
2185 if (zfcp_fsf_exchange_config_evaluate(fsf_req, 0))
2186 return -EIO;
2187
2188 atomic_set_mask(ZFCP_STATUS_ADAPTER_XCONFIG_OK, &adapter->status);
2189
2190 zfcp_fsf_link_down_info_eval(adapter,
2191 &qtcb->header.fsf_status_qual.link_down_info);
2192 break;
2193 default:
2194 debug_text_event(fsf_req->adapter->erp_dbf, 0, "fsf-stat-ng");
2195 debug_event(fsf_req->adapter->erp_dbf, 0,
2196 &fsf_req->qtcb->header.fsf_status, sizeof (u32));
2197 zfcp_erp_adapter_shutdown(adapter, 0);
2198 return -EIO;
2199 }
2200 return 0;
2201 }
2202
2203 /**
2204 * zfcp_fsf_exchange_port_data - request information about local port
2205 * @erp_action: ERP action for the adapter for which port data is requested
2206 * @adapter: for which port data is requested
2207 * @data: response to exchange port data request
2208 */
2209 int
2210 zfcp_fsf_exchange_port_data(struct zfcp_erp_action *erp_action,
2211 struct zfcp_adapter *adapter,
2212 struct fsf_qtcb_bottom_port *data)
2213 {
2214 volatile struct qdio_buffer_element *sbale;
2215 int retval = 0;
2216 unsigned long lock_flags;
2217 struct zfcp_fsf_req *fsf_req;
2218 struct timer_list *timer;
2219
2220 if (!(adapter->adapter_features & FSF_FEATURE_HBAAPI_MANAGEMENT)) {
2221 ZFCP_LOG_INFO("error: exchange port data "
2222 "command not supported by adapter %s\n",
2223 zfcp_get_busid_by_adapter(adapter));
2224 return -EOPNOTSUPP;
2225 }
2226
2227 /* setup new FSF request */
2228 retval = zfcp_fsf_req_create(adapter, FSF_QTCB_EXCHANGE_PORT_DATA,
2229 erp_action ? ZFCP_REQ_AUTO_CLEANUP : 0,
2230 0, &lock_flags, &fsf_req);
2231 if (retval < 0) {
2232 ZFCP_LOG_INFO("error: Out of resources. Could not create an "
2233 "exchange port data request for"
2234 "the adapter %s.\n",
2235 zfcp_get_busid_by_adapter(adapter));
2236 write_unlock_irqrestore(&adapter->request_queue.queue_lock,
2237 lock_flags);
2238 return retval;
2239 }
2240
2241 if (data)
2242 fsf_req->data = (unsigned long) data;
2243
2244 sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
2245 sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
2246 sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
2247
2248 if (erp_action) {
2249 erp_action->fsf_req = fsf_req;
2250 fsf_req->erp_action = erp_action;
2251 timer = &erp_action->timer;
2252 } else {
2253 timer = kmalloc(sizeof(struct timer_list), GFP_ATOMIC);
2254 if (!timer) {
2255 write_unlock_irqrestore(&adapter->request_queue.queue_lock,
2256 lock_flags);
2257 zfcp_fsf_req_free(fsf_req);
2258 return -ENOMEM;
2259 }
2260 init_timer(timer);
2261 timer->function = zfcp_fsf_request_timeout_handler;
2262 timer->data = (unsigned long) adapter;
2263 timer->expires = ZFCP_FSF_REQUEST_TIMEOUT;
2264 }
2265
2266 retval = zfcp_fsf_req_send(fsf_req, timer);
2267 if (retval) {
2268 ZFCP_LOG_INFO("error: Could not send an exchange port data "
2269 "command on the adapter %s\n",
2270 zfcp_get_busid_by_adapter(adapter));
2271 zfcp_fsf_req_free(fsf_req);
2272 if (erp_action)
2273 erp_action->fsf_req = NULL;
2274 else
2275 kfree(timer);
2276 write_unlock_irqrestore(&adapter->request_queue.queue_lock,
2277 lock_flags);
2278 return retval;
2279 }
2280
2281 write_unlock_irqrestore(&adapter->request_queue.queue_lock, lock_flags);
2282
2283 if (!erp_action) {
2284 wait_event(fsf_req->completion_wq,
2285 fsf_req->status & ZFCP_STATUS_FSFREQ_COMPLETED);
2286 del_timer_sync(timer);
2287 zfcp_fsf_req_free(fsf_req);
2288 kfree(timer);
2289 }
2290 return retval;
2291 }
2292
2293 /**
2294 * zfcp_fsf_exchange_port_evaluate
2295 * @fsf_req: fsf_req which belongs to xchg port data request
2296 * @xchg_ok: specifies if xchg port data was incomplete or complete (0/1)
2297 */
2298 static void
2299 zfcp_fsf_exchange_port_evaluate(struct zfcp_fsf_req *fsf_req, int xchg_ok)
2300 {
2301 struct zfcp_adapter *adapter;
2302 struct fsf_qtcb *qtcb;
2303 struct fsf_qtcb_bottom_port *bottom, *data;
2304 struct Scsi_Host *shost;
2305
2306 adapter = fsf_req->adapter;
2307 qtcb = fsf_req->qtcb;
2308 bottom = &qtcb->bottom.port;
2309 shost = adapter->scsi_host;
2310
2311 data = (struct fsf_qtcb_bottom_port*) fsf_req->data;
2312 if (data)
2313 memcpy(data, bottom, sizeof(struct fsf_qtcb_bottom_port));
2314
2315 if (adapter->connection_features & FSF_FEATURE_NPIV_MODE)
2316 fc_host_permanent_port_name(shost) = bottom->wwpn;
2317 else
2318 fc_host_permanent_port_name(shost) = fc_host_port_name(shost);
2319 fc_host_maxframe_size(shost) = bottom->maximum_frame_size;
2320 fc_host_supported_speeds(shost) = bottom->supported_speed;
2321 }
2322
2323 /**
2324 * zfcp_fsf_exchange_port_data_handler - handler for exchange_port_data request
2325 * @fsf_req: pointer to struct zfcp_fsf_req
2326 */
2327 static void
2328 zfcp_fsf_exchange_port_data_handler(struct zfcp_fsf_req *fsf_req)
2329 {
2330 struct zfcp_adapter *adapter;
2331 struct fsf_qtcb *qtcb;
2332
2333 adapter = fsf_req->adapter;
2334 qtcb = fsf_req->qtcb;
2335
2336 if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR)
2337 return;
2338
2339 switch (qtcb->header.fsf_status) {
2340 case FSF_GOOD:
2341 zfcp_fsf_exchange_port_evaluate(fsf_req, 1);
2342 atomic_set_mask(ZFCP_STATUS_ADAPTER_XPORT_OK, &adapter->status);
2343 break;
2344 case FSF_EXCHANGE_CONFIG_DATA_INCOMPLETE:
2345 zfcp_fsf_exchange_port_evaluate(fsf_req, 0);
2346 atomic_set_mask(ZFCP_STATUS_ADAPTER_XPORT_OK, &adapter->status);
2347 zfcp_fsf_link_down_info_eval(adapter,
2348 &qtcb->header.fsf_status_qual.link_down_info);
2349 break;
2350 default:
2351 debug_text_event(adapter->erp_dbf, 0, "xchg-port-ng");
2352 debug_event(adapter->erp_dbf, 0,
2353 &fsf_req->qtcb->header.fsf_status, sizeof(u32));
2354 }
2355 }
2356
2357
2358 /*
2359 * function: zfcp_fsf_open_port
2360 *
2361 * purpose:
2362 *
2363 * returns: address of initiated FSF request
2364 * NULL - request could not be initiated
2365 */
2366 int
2367 zfcp_fsf_open_port(struct zfcp_erp_action *erp_action)
2368 {
2369 volatile struct qdio_buffer_element *sbale;
2370 unsigned long lock_flags;
2371 int retval = 0;
2372
2373 /* setup new FSF request */
2374 retval = zfcp_fsf_req_create(erp_action->adapter,
2375 FSF_QTCB_OPEN_PORT_WITH_DID,
2376 ZFCP_WAIT_FOR_SBAL | ZFCP_REQ_AUTO_CLEANUP,
2377 erp_action->adapter->pool.fsf_req_erp,
2378 &lock_flags, &(erp_action->fsf_req));
2379 if (retval < 0) {
2380 ZFCP_LOG_INFO("error: Could not create open port request "
2381 "for port 0x%016Lx on adapter %s.\n",
2382 erp_action->port->wwpn,
2383 zfcp_get_busid_by_adapter(erp_action->adapter));
2384 goto out;
2385 }
2386
2387 sbale = zfcp_qdio_sbale_req(erp_action->fsf_req,
2388 erp_action->fsf_req->sbal_curr, 0);
2389 sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
2390 sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
2391
2392 erp_action->fsf_req->qtcb->bottom.support.d_id = erp_action->port->d_id;
2393 atomic_set_mask(ZFCP_STATUS_COMMON_OPENING, &erp_action->port->status);
2394 erp_action->fsf_req->data = (unsigned long) erp_action->port;
2395 erp_action->fsf_req->erp_action = erp_action;
2396
2397 /* start QDIO request for this FSF request */
2398 retval = zfcp_fsf_req_send(erp_action->fsf_req, &erp_action->timer);
2399 if (retval) {
2400 ZFCP_LOG_INFO("error: Could not send open port request for "
2401 "port 0x%016Lx on adapter %s.\n",
2402 erp_action->port->wwpn,
2403 zfcp_get_busid_by_adapter(erp_action->adapter));
2404 zfcp_fsf_req_free(erp_action->fsf_req);
2405 erp_action->fsf_req = NULL;
2406 goto out;
2407 }
2408
2409 ZFCP_LOG_DEBUG("open port request initiated "
2410 "(adapter %s, port 0x%016Lx)\n",
2411 zfcp_get_busid_by_adapter(erp_action->adapter),
2412 erp_action->port->wwpn);
2413 out:
2414 write_unlock_irqrestore(&erp_action->adapter->request_queue.queue_lock,
2415 lock_flags);
2416 return retval;
2417 }
2418
2419 /*
2420 * function: zfcp_fsf_open_port_handler
2421 *
2422 * purpose: is called for finished Open Port command
2423 *
2424 * returns:
2425 */
2426 static int
2427 zfcp_fsf_open_port_handler(struct zfcp_fsf_req *fsf_req)
2428 {
2429 int retval = -EINVAL;
2430 struct zfcp_port *port;
2431 struct fsf_plogi *plogi;
2432 struct fsf_qtcb_header *header;
2433 u16 subtable, rule, counter;
2434
2435 port = (struct zfcp_port *) fsf_req->data;
2436 header = &fsf_req->qtcb->header;
2437
2438 if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR) {
2439 /* don't change port status in our bookkeeping */
2440 goto skip_fsfstatus;
2441 }
2442
2443 /* evaluate FSF status in QTCB */
2444 switch (header->fsf_status) {
2445
2446 case FSF_PORT_ALREADY_OPEN:
2447 ZFCP_LOG_NORMAL("bug: remote port 0x%016Lx on adapter %s "
2448 "is already open.\n",
2449 port->wwpn, zfcp_get_busid_by_port(port));
2450 debug_text_exception(fsf_req->adapter->erp_dbf, 0,
2451 "fsf_s_popen");
2452 /*
2453 * This is a bug, however operation should continue normally
2454 * if it is simply ignored
2455 */
2456 break;
2457
2458 case FSF_ACCESS_DENIED:
2459 ZFCP_LOG_NORMAL("Access denied, cannot open port 0x%016Lx "
2460 "on adapter %s\n",
2461 port->wwpn, zfcp_get_busid_by_port(port));
2462 for (counter = 0; counter < 2; counter++) {
2463 subtable = header->fsf_status_qual.halfword[counter * 2];
2464 rule = header->fsf_status_qual.halfword[counter * 2 + 1];
2465 switch (subtable) {
2466 case FSF_SQ_CFDC_SUBTABLE_OS:
2467 case FSF_SQ_CFDC_SUBTABLE_PORT_WWPN:
2468 case FSF_SQ_CFDC_SUBTABLE_PORT_DID:
2469 case FSF_SQ_CFDC_SUBTABLE_LUN:
2470 ZFCP_LOG_INFO("Access denied (%s rule %d)\n",
2471 zfcp_act_subtable_type[subtable], rule);
2472 break;
2473 }
2474 }
2475 debug_text_event(fsf_req->adapter->erp_dbf, 1, "fsf_s_access");
2476 zfcp_erp_port_access_denied(port);
2477 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2478 break;
2479
2480 case FSF_MAXIMUM_NUMBER_OF_PORTS_EXCEEDED:
2481 ZFCP_LOG_INFO("error: The FSF adapter is out of resources. "
2482 "The remote port 0x%016Lx on adapter %s "
2483 "could not be opened. Disabling it.\n",
2484 port->wwpn, zfcp_get_busid_by_port(port));
2485 debug_text_event(fsf_req->adapter->erp_dbf, 1,
2486 "fsf_s_max_ports");
2487 zfcp_erp_port_failed(port);
2488 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2489 break;
2490
2491 case FSF_ADAPTER_STATUS_AVAILABLE:
2492 switch (header->fsf_status_qual.word[0]) {
2493 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
2494 debug_text_event(fsf_req->adapter->erp_dbf, 1,
2495 "fsf_sq_ltest");
2496 /* ERP strategy will escalate */
2497 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2498 break;
2499 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
2500 /* ERP strategy will escalate */
2501 debug_text_event(fsf_req->adapter->erp_dbf, 1,
2502 "fsf_sq_ulp");
2503 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2504 break;
2505 case FSF_SQ_NO_RETRY_POSSIBLE:
2506 ZFCP_LOG_NORMAL("The remote port 0x%016Lx on "
2507 "adapter %s could not be opened. "
2508 "Disabling it.\n",
2509 port->wwpn,
2510 zfcp_get_busid_by_port(port));
2511 debug_text_exception(fsf_req->adapter->erp_dbf, 0,
2512 "fsf_sq_no_retry");
2513 zfcp_erp_port_failed(port);
2514 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2515 break;
2516 default:
2517 ZFCP_LOG_NORMAL
2518 ("bug: Wrong status qualifier 0x%x arrived.\n",
2519 header->fsf_status_qual.word[0]);
2520 debug_text_event(fsf_req->adapter->erp_dbf, 0,
2521 "fsf_sq_inval:");
2522 debug_exception(
2523 fsf_req->adapter->erp_dbf, 0,
2524 &header->fsf_status_qual.word[0],
2525 sizeof (u32));
2526 break;
2527 }
2528 break;
2529
2530 case FSF_GOOD:
2531 /* save port handle assigned by FSF */
2532 port->handle = header->port_handle;
2533 ZFCP_LOG_INFO("The remote port 0x%016Lx via adapter %s "
2534 "was opened, it's port handle is 0x%x\n",
2535 port->wwpn, zfcp_get_busid_by_port(port),
2536 port->handle);
2537 /* mark port as open */
2538 atomic_set_mask(ZFCP_STATUS_COMMON_OPEN |
2539 ZFCP_STATUS_PORT_PHYS_OPEN, &port->status);
2540 atomic_clear_mask(ZFCP_STATUS_COMMON_ACCESS_DENIED |
2541 ZFCP_STATUS_COMMON_ACCESS_BOXED,
2542 &port->status);
2543 retval = 0;
2544 /* check whether D_ID has changed during open */
2545 /*
2546 * FIXME: This check is not airtight, as the FCP channel does
2547 * not monitor closures of target port connections caused on
2548 * the remote side. Thus, they might miss out on invalidating
2549 * locally cached WWPNs (and other N_Port parameters) of gone
2550 * target ports. So, our heroic attempt to make things safe
2551 * could be undermined by 'open port' response data tagged with
2552 * obsolete WWPNs. Another reason to monitor potential
2553 * connection closures ourself at least (by interpreting
2554 * incoming ELS' and unsolicited status). It just crosses my
2555 * mind that one should be able to cross-check by means of
2556 * another GID_PN straight after a port has been opened.
2557 * Alternately, an ADISC/PDISC ELS should suffice, as well.
2558 */
2559 plogi = (struct fsf_plogi *) fsf_req->qtcb->bottom.support.els;
2560 if (!atomic_test_mask(ZFCP_STATUS_PORT_NO_WWPN, &port->status))
2561 {
2562 if (fsf_req->qtcb->bottom.support.els1_length <
2563 ((((unsigned long) &plogi->serv_param.wwpn) -
2564 ((unsigned long) plogi)) + sizeof (u64))) {
2565 ZFCP_LOG_INFO(
2566 "warning: insufficient length of "
2567 "PLOGI payload (%i)\n",
2568 fsf_req->qtcb->bottom.support.els1_length);
2569 debug_text_event(fsf_req->adapter->erp_dbf, 0,
2570 "fsf_s_short_plogi:");
2571 /* skip sanity check and assume wwpn is ok */
2572 } else {
2573 if (plogi->serv_param.wwpn != port->wwpn) {
2574 ZFCP_LOG_INFO("warning: d_id of port "
2575 "0x%016Lx changed during "
2576 "open\n", port->wwpn);
2577 debug_text_event(
2578 fsf_req->adapter->erp_dbf, 0,
2579 "fsf_s_did_change:");
2580 atomic_clear_mask(
2581 ZFCP_STATUS_PORT_DID_DID,
2582 &port->status);
2583 } else
2584 port->wwnn = plogi->serv_param.wwnn;
2585 }
2586 }
2587 break;
2588
2589 case FSF_UNKNOWN_OP_SUBTYPE:
2590 /* should never occure, subtype not set in zfcp_fsf_open_port */
2591 ZFCP_LOG_INFO("unknown operation subtype (adapter: %s, "
2592 "op_subtype=0x%x)\n",
2593 zfcp_get_busid_by_port(port),
2594 fsf_req->qtcb->bottom.support.operation_subtype);
2595 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2596 break;
2597
2598 default:
2599 ZFCP_LOG_NORMAL("bug: An unknown FSF Status was presented "
2600 "(debug info 0x%x)\n",
2601 header->fsf_status);
2602 debug_text_event(fsf_req->adapter->erp_dbf, 0, "fsf_s_inval:");
2603 debug_exception(fsf_req->adapter->erp_dbf, 0,
2604 &header->fsf_status, sizeof (u32));
2605 break;
2606 }
2607
2608 skip_fsfstatus:
2609 atomic_clear_mask(ZFCP_STATUS_COMMON_OPENING, &port->status);
2610 return retval;
2611 }
2612
2613 /*
2614 * function: zfcp_fsf_close_port
2615 *
2616 * purpose: submit FSF command "close port"
2617 *
2618 * returns: address of initiated FSF request
2619 * NULL - request could not be initiated
2620 */
2621 int
2622 zfcp_fsf_close_port(struct zfcp_erp_action *erp_action)
2623 {
2624 volatile struct qdio_buffer_element *sbale;
2625 unsigned long lock_flags;
2626 int retval = 0;
2627
2628 /* setup new FSF request */
2629 retval = zfcp_fsf_req_create(erp_action->adapter,
2630 FSF_QTCB_CLOSE_PORT,
2631 ZFCP_WAIT_FOR_SBAL | ZFCP_REQ_AUTO_CLEANUP,
2632 erp_action->adapter->pool.fsf_req_erp,
2633 &lock_flags, &(erp_action->fsf_req));
2634 if (retval < 0) {
2635 ZFCP_LOG_INFO("error: Could not create a close port request "
2636 "for port 0x%016Lx on adapter %s.\n",
2637 erp_action->port->wwpn,
2638 zfcp_get_busid_by_adapter(erp_action->adapter));
2639 goto out;
2640 }
2641
2642 sbale = zfcp_qdio_sbale_req(erp_action->fsf_req,
2643 erp_action->fsf_req->sbal_curr, 0);
2644 sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
2645 sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
2646
2647 atomic_set_mask(ZFCP_STATUS_COMMON_CLOSING, &erp_action->port->status);
2648 erp_action->fsf_req->data = (unsigned long) erp_action->port;
2649 erp_action->fsf_req->erp_action = erp_action;
2650 erp_action->fsf_req->qtcb->header.port_handle =
2651 erp_action->port->handle;
2652
2653 /* start QDIO request for this FSF request */
2654 retval = zfcp_fsf_req_send(erp_action->fsf_req, &erp_action->timer);
2655 if (retval) {
2656 ZFCP_LOG_INFO("error: Could not send a close port request for "
2657 "port 0x%016Lx on adapter %s.\n",
2658 erp_action->port->wwpn,
2659 zfcp_get_busid_by_adapter(erp_action->adapter));
2660 zfcp_fsf_req_free(erp_action->fsf_req);
2661 erp_action->fsf_req = NULL;
2662 goto out;
2663 }
2664
2665 ZFCP_LOG_TRACE("close port request initiated "
2666 "(adapter %s, port 0x%016Lx)\n",
2667 zfcp_get_busid_by_adapter(erp_action->adapter),
2668 erp_action->port->wwpn);
2669 out:
2670 write_unlock_irqrestore(&erp_action->adapter->request_queue.queue_lock,
2671 lock_flags);
2672 return retval;
2673 }
2674
2675 /*
2676 * function: zfcp_fsf_close_port_handler
2677 *
2678 * purpose: is called for finished Close Port FSF command
2679 *
2680 * returns:
2681 */
2682 static int
2683 zfcp_fsf_close_port_handler(struct zfcp_fsf_req *fsf_req)
2684 {
2685 int retval = -EINVAL;
2686 struct zfcp_port *port;
2687
2688 port = (struct zfcp_port *) fsf_req->data;
2689
2690 if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR) {
2691 /* don't change port status in our bookkeeping */
2692 goto skip_fsfstatus;
2693 }
2694
2695 /* evaluate FSF status in QTCB */
2696 switch (fsf_req->qtcb->header.fsf_status) {
2697
2698 case FSF_PORT_HANDLE_NOT_VALID:
2699 ZFCP_LOG_INFO("Temporary port identifier 0x%x for port "
2700 "0x%016Lx on adapter %s invalid. This may happen "
2701 "occasionally.\n", port->handle,
2702 port->wwpn, zfcp_get_busid_by_port(port));
2703 ZFCP_LOG_DEBUG("status qualifier:\n");
2704 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
2705 (char *) &fsf_req->qtcb->header.fsf_status_qual,
2706 sizeof (union fsf_status_qual));
2707 debug_text_event(fsf_req->adapter->erp_dbf, 1,
2708 "fsf_s_phand_nv");
2709 zfcp_erp_adapter_reopen(port->adapter, 0);
2710 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2711 break;
2712
2713 case FSF_ADAPTER_STATUS_AVAILABLE:
2714 /* Note: FSF has actually closed the port in this case.
2715 * The status code is just daft. Fingers crossed for a change
2716 */
2717 retval = 0;
2718 break;
2719
2720 case FSF_GOOD:
2721 ZFCP_LOG_TRACE("remote port 0x016%Lx on adapter %s closed, "
2722 "port handle 0x%x\n", port->wwpn,
2723 zfcp_get_busid_by_port(port), port->handle);
2724 zfcp_erp_modify_port_status(port,
2725 ZFCP_STATUS_COMMON_OPEN,
2726 ZFCP_CLEAR);
2727 retval = 0;
2728 break;
2729
2730 default:
2731 ZFCP_LOG_NORMAL("bug: An unknown FSF Status was presented "
2732 "(debug info 0x%x)\n",
2733 fsf_req->qtcb->header.fsf_status);
2734 debug_text_event(fsf_req->adapter->erp_dbf, 0, "fsf_s_inval:");
2735 debug_exception(fsf_req->adapter->erp_dbf, 0,
2736 &fsf_req->qtcb->header.fsf_status,
2737 sizeof (u32));
2738 break;
2739 }
2740
2741 skip_fsfstatus:
2742 atomic_clear_mask(ZFCP_STATUS_COMMON_CLOSING, &port->status);
2743 return retval;
2744 }
2745
2746 /*
2747 * function: zfcp_fsf_close_physical_port
2748 *
2749 * purpose: submit FSF command "close physical port"
2750 *
2751 * returns: address of initiated FSF request
2752 * NULL - request could not be initiated
2753 */
2754 int
2755 zfcp_fsf_close_physical_port(struct zfcp_erp_action *erp_action)
2756 {
2757 int retval = 0;
2758 unsigned long lock_flags;
2759 volatile struct qdio_buffer_element *sbale;
2760
2761 /* setup new FSF request */
2762 retval = zfcp_fsf_req_create(erp_action->adapter,
2763 FSF_QTCB_CLOSE_PHYSICAL_PORT,
2764 ZFCP_WAIT_FOR_SBAL | ZFCP_REQ_AUTO_CLEANUP,
2765 erp_action->adapter->pool.fsf_req_erp,
2766 &lock_flags, &erp_action->fsf_req);
2767 if (retval < 0) {
2768 ZFCP_LOG_INFO("error: Could not create close physical port "
2769 "request (adapter %s, port 0x%016Lx)\n",
2770 zfcp_get_busid_by_adapter(erp_action->adapter),
2771 erp_action->port->wwpn);
2772
2773 goto out;
2774 }
2775
2776 sbale = zfcp_qdio_sbale_req(erp_action->fsf_req,
2777 erp_action->fsf_req->sbal_curr, 0);
2778 sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
2779 sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
2780
2781 /* mark port as being closed */
2782 atomic_set_mask(ZFCP_STATUS_PORT_PHYS_CLOSING,
2783 &erp_action->port->status);
2784 /* save a pointer to this port */
2785 erp_action->fsf_req->data = (unsigned long) erp_action->port;
2786 /* port to be closed */
2787 erp_action->fsf_req->qtcb->header.port_handle =
2788 erp_action->port->handle;
2789 erp_action->fsf_req->erp_action = erp_action;
2790
2791 /* start QDIO request for this FSF request */
2792 retval = zfcp_fsf_req_send(erp_action->fsf_req, &erp_action->timer);
2793 if (retval) {
2794 ZFCP_LOG_INFO("error: Could not send close physical port "
2795 "request (adapter %s, port 0x%016Lx)\n",
2796 zfcp_get_busid_by_adapter(erp_action->adapter),
2797 erp_action->port->wwpn);
2798 zfcp_fsf_req_free(erp_action->fsf_req);
2799 erp_action->fsf_req = NULL;
2800 goto out;
2801 }
2802
2803 ZFCP_LOG_TRACE("close physical port request initiated "
2804 "(adapter %s, port 0x%016Lx)\n",
2805 zfcp_get_busid_by_adapter(erp_action->adapter),
2806 erp_action->port->wwpn);
2807 out:
2808 write_unlock_irqrestore(&erp_action->adapter->request_queue.queue_lock,
2809 lock_flags);
2810 return retval;
2811 }
2812
2813 /*
2814 * function: zfcp_fsf_close_physical_port_handler
2815 *
2816 * purpose: is called for finished Close Physical Port FSF command
2817 *
2818 * returns:
2819 */
2820 static int
2821 zfcp_fsf_close_physical_port_handler(struct zfcp_fsf_req *fsf_req)
2822 {
2823 int retval = -EINVAL;
2824 struct zfcp_port *port;
2825 struct zfcp_unit *unit;
2826 struct fsf_qtcb_header *header;
2827 u16 subtable, rule, counter;
2828
2829 port = (struct zfcp_port *) fsf_req->data;
2830 header = &fsf_req->qtcb->header;
2831
2832 if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR) {
2833 /* don't change port status in our bookkeeping */
2834 goto skip_fsfstatus;
2835 }
2836
2837 /* evaluate FSF status in QTCB */
2838 switch (header->fsf_status) {
2839
2840 case FSF_PORT_HANDLE_NOT_VALID:
2841 ZFCP_LOG_INFO("Temporary port identifier 0x%x invalid"
2842 "(adapter %s, port 0x%016Lx). "
2843 "This may happen occasionally.\n",
2844 port->handle,
2845 zfcp_get_busid_by_port(port),
2846 port->wwpn);
2847 ZFCP_LOG_DEBUG("status qualifier:\n");
2848 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
2849 (char *) &header->fsf_status_qual,
2850 sizeof (union fsf_status_qual));
2851 debug_text_event(fsf_req->adapter->erp_dbf, 1,
2852 "fsf_s_phand_nv");
2853 zfcp_erp_adapter_reopen(port->adapter, 0);
2854 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2855 break;
2856
2857 case FSF_ACCESS_DENIED:
2858 ZFCP_LOG_NORMAL("Access denied, cannot close "
2859 "physical port 0x%016Lx on adapter %s\n",
2860 port->wwpn, zfcp_get_busid_by_port(port));
2861 for (counter = 0; counter < 2; counter++) {
2862 subtable = header->fsf_status_qual.halfword[counter * 2];
2863 rule = header->fsf_status_qual.halfword[counter * 2 + 1];
2864 switch (subtable) {
2865 case FSF_SQ_CFDC_SUBTABLE_OS:
2866 case FSF_SQ_CFDC_SUBTABLE_PORT_WWPN:
2867 case FSF_SQ_CFDC_SUBTABLE_PORT_DID:
2868 case FSF_SQ_CFDC_SUBTABLE_LUN:
2869 ZFCP_LOG_INFO("Access denied (%s rule %d)\n",
2870 zfcp_act_subtable_type[subtable], rule);
2871 break;
2872 }
2873 }
2874 debug_text_event(fsf_req->adapter->erp_dbf, 1, "fsf_s_access");
2875 zfcp_erp_port_access_denied(port);
2876 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2877 break;
2878
2879 case FSF_PORT_BOXED:
2880 ZFCP_LOG_DEBUG("The remote port 0x%016Lx on adapter "
2881 "%s needs to be reopened but it was attempted "
2882 "to close it physically.\n",
2883 port->wwpn,
2884 zfcp_get_busid_by_port(port));
2885 debug_text_event(fsf_req->adapter->erp_dbf, 1, "fsf_s_pboxed");
2886 zfcp_erp_port_boxed(port);
2887 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR |
2888 ZFCP_STATUS_FSFREQ_RETRY;
2889 break;
2890
2891 case FSF_ADAPTER_STATUS_AVAILABLE:
2892 switch (header->fsf_status_qual.word[0]) {
2893 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
2894 debug_text_event(fsf_req->adapter->erp_dbf, 1,
2895 "fsf_sq_ltest");
2896 /* This will now be escalated by ERP */
2897 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2898 break;
2899 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
2900 /* ERP strategy will escalate */
2901 debug_text_event(fsf_req->adapter->erp_dbf, 1,
2902 "fsf_sq_ulp");
2903 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2904 break;
2905 default:
2906 ZFCP_LOG_NORMAL
2907 ("bug: Wrong status qualifier 0x%x arrived.\n",
2908 header->fsf_status_qual.word[0]);
2909 debug_text_event(fsf_req->adapter->erp_dbf, 0,
2910 "fsf_sq_inval:");
2911 debug_exception(
2912 fsf_req->adapter->erp_dbf, 0,
2913 &header->fsf_status_qual.word[0], sizeof (u32));
2914 break;
2915 }
2916 break;
2917
2918 case FSF_GOOD:
2919 ZFCP_LOG_DEBUG("Remote port 0x%016Lx via adapter %s "
2920 "physically closed, port handle 0x%x\n",
2921 port->wwpn,
2922 zfcp_get_busid_by_port(port), port->handle);
2923 /* can't use generic zfcp_erp_modify_port_status because
2924 * ZFCP_STATUS_COMMON_OPEN must not be reset for the port
2925 */
2926 atomic_clear_mask(ZFCP_STATUS_PORT_PHYS_OPEN, &port->status);
2927 list_for_each_entry(unit, &port->unit_list_head, list)
2928 atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN, &unit->status);
2929 retval = 0;
2930 break;
2931
2932 default:
2933 ZFCP_LOG_NORMAL("bug: An unknown FSF Status was presented "
2934 "(debug info 0x%x)\n",
2935 header->fsf_status);
2936 debug_text_event(fsf_req->adapter->erp_dbf, 0, "fsf_s_inval:");
2937 debug_exception(fsf_req->adapter->erp_dbf, 0,
2938 &header->fsf_status, sizeof (u32));
2939 break;
2940 }
2941
2942 skip_fsfstatus:
2943 atomic_clear_mask(ZFCP_STATUS_PORT_PHYS_CLOSING, &port->status);
2944 return retval;
2945 }
2946
2947 /*
2948 * function: zfcp_fsf_open_unit
2949 *
2950 * purpose:
2951 *
2952 * returns:
2953 *
2954 * assumptions: This routine does not check whether the associated
2955 * remote port has already been opened. This should be
2956 * done by calling routines. Otherwise some status
2957 * may be presented by FSF
2958 */
2959 int
2960 zfcp_fsf_open_unit(struct zfcp_erp_action *erp_action)
2961 {
2962 volatile struct qdio_buffer_element *sbale;
2963 unsigned long lock_flags;
2964 int retval = 0;
2965
2966 /* setup new FSF request */
2967 retval = zfcp_fsf_req_create(erp_action->adapter,
2968 FSF_QTCB_OPEN_LUN,
2969 ZFCP_WAIT_FOR_SBAL | ZFCP_REQ_AUTO_CLEANUP,
2970 erp_action->adapter->pool.fsf_req_erp,
2971 &lock_flags, &(erp_action->fsf_req));
2972 if (retval < 0) {
2973 ZFCP_LOG_INFO("error: Could not create open unit request for "
2974 "unit 0x%016Lx on port 0x%016Lx on adapter %s.\n",
2975 erp_action->unit->fcp_lun,
2976 erp_action->unit->port->wwpn,
2977 zfcp_get_busid_by_adapter(erp_action->adapter));
2978 goto out;
2979 }
2980
2981 sbale = zfcp_qdio_sbale_req(erp_action->fsf_req,
2982 erp_action->fsf_req->sbal_curr, 0);
2983 sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
2984 sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
2985
2986 erp_action->fsf_req->qtcb->header.port_handle =
2987 erp_action->port->handle;
2988 erp_action->fsf_req->qtcb->bottom.support.fcp_lun =
2989 erp_action->unit->fcp_lun;
2990 if (!(erp_action->adapter->connection_features & FSF_FEATURE_NPIV_MODE))
2991 erp_action->fsf_req->qtcb->bottom.support.option =
2992 FSF_OPEN_LUN_SUPPRESS_BOXING;
2993 atomic_set_mask(ZFCP_STATUS_COMMON_OPENING, &erp_action->unit->status);
2994 erp_action->fsf_req->data = (unsigned long) erp_action->unit;
2995 erp_action->fsf_req->erp_action = erp_action;
2996
2997 /* start QDIO request for this FSF request */
2998 retval = zfcp_fsf_req_send(erp_action->fsf_req, &erp_action->timer);
2999 if (retval) {
3000 ZFCP_LOG_INFO("error: Could not send an open unit request "
3001 "on the adapter %s, port 0x%016Lx for "
3002 "unit 0x%016Lx\n",
3003 zfcp_get_busid_by_adapter(erp_action->adapter),
3004 erp_action->port->wwpn,
3005 erp_action->unit->fcp_lun);
3006 zfcp_fsf_req_free(erp_action->fsf_req);
3007 erp_action->fsf_req = NULL;
3008 goto out;
3009 }
3010
3011 ZFCP_LOG_TRACE("Open LUN request initiated (adapter %s, "
3012 "port 0x%016Lx, unit 0x%016Lx)\n",
3013 zfcp_get_busid_by_adapter(erp_action->adapter),
3014 erp_action->port->wwpn, erp_action->unit->fcp_lun);
3015 out:
3016 write_unlock_irqrestore(&erp_action->adapter->request_queue.queue_lock,
3017 lock_flags);
3018 return retval;
3019 }
3020
3021 /*
3022 * function: zfcp_fsf_open_unit_handler
3023 *
3024 * purpose: is called for finished Open LUN command
3025 *
3026 * returns:
3027 */
3028 static int
3029 zfcp_fsf_open_unit_handler(struct zfcp_fsf_req *fsf_req)
3030 {
3031 int retval = -EINVAL;
3032 struct zfcp_adapter *adapter;
3033 struct zfcp_unit *unit;
3034 struct fsf_qtcb_header *header;
3035 struct fsf_qtcb_bottom_support *bottom;
3036 struct fsf_queue_designator *queue_designator;
3037 u16 subtable, rule, counter;
3038 int exclusive, readwrite;
3039
3040 unit = (struct zfcp_unit *) fsf_req->data;
3041
3042 if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR) {
3043 /* don't change unit status in our bookkeeping */
3044 goto skip_fsfstatus;
3045 }
3046
3047 adapter = fsf_req->adapter;
3048 header = &fsf_req->qtcb->header;
3049 bottom = &fsf_req->qtcb->bottom.support;
3050 queue_designator = &header->fsf_status_qual.fsf_queue_designator;
3051
3052 atomic_clear_mask(ZFCP_STATUS_COMMON_ACCESS_DENIED |
3053 ZFCP_STATUS_UNIT_SHARED |
3054 ZFCP_STATUS_UNIT_READONLY,
3055 &unit->status);
3056
3057 /* evaluate FSF status in QTCB */
3058 switch (header->fsf_status) {
3059
3060 case FSF_PORT_HANDLE_NOT_VALID:
3061 ZFCP_LOG_INFO("Temporary port identifier 0x%x "
3062 "for port 0x%016Lx on adapter %s invalid "
3063 "This may happen occasionally\n",
3064 unit->port->handle,
3065 unit->port->wwpn, zfcp_get_busid_by_unit(unit));
3066 ZFCP_LOG_DEBUG("status qualifier:\n");
3067 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
3068 (char *) &header->fsf_status_qual,
3069 sizeof (union fsf_status_qual));
3070 debug_text_event(adapter->erp_dbf, 1, "fsf_s_ph_nv");
3071 zfcp_erp_adapter_reopen(unit->port->adapter, 0);
3072 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3073 break;
3074
3075 case FSF_LUN_ALREADY_OPEN:
3076 ZFCP_LOG_NORMAL("bug: Attempted to open unit 0x%016Lx on "
3077 "remote port 0x%016Lx on adapter %s twice.\n",
3078 unit->fcp_lun,
3079 unit->port->wwpn, zfcp_get_busid_by_unit(unit));
3080 debug_text_exception(adapter->erp_dbf, 0,
3081 "fsf_s_uopen");
3082 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3083 break;
3084
3085 case FSF_ACCESS_DENIED:
3086 ZFCP_LOG_NORMAL("Access denied, cannot open unit 0x%016Lx on "
3087 "remote port 0x%016Lx on adapter %s\n",
3088 unit->fcp_lun, unit->port->wwpn,
3089 zfcp_get_busid_by_unit(unit));
3090 for (counter = 0; counter < 2; counter++) {
3091 subtable = header->fsf_status_qual.halfword[counter * 2];
3092 rule = header->fsf_status_qual.halfword[counter * 2 + 1];
3093 switch (subtable) {
3094 case FSF_SQ_CFDC_SUBTABLE_OS:
3095 case FSF_SQ_CFDC_SUBTABLE_PORT_WWPN:
3096 case FSF_SQ_CFDC_SUBTABLE_PORT_DID:
3097 case FSF_SQ_CFDC_SUBTABLE_LUN:
3098 ZFCP_LOG_INFO("Access denied (%s rule %d)\n",
3099 zfcp_act_subtable_type[subtable], rule);
3100 break;
3101 }
3102 }
3103 debug_text_event(adapter->erp_dbf, 1, "fsf_s_access");
3104 zfcp_erp_unit_access_denied(unit);
3105 atomic_clear_mask(ZFCP_STATUS_UNIT_SHARED, &unit->status);
3106 atomic_clear_mask(ZFCP_STATUS_UNIT_READONLY, &unit->status);
3107 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3108 break;
3109
3110 case FSF_PORT_BOXED:
3111 ZFCP_LOG_DEBUG("The remote port 0x%016Lx on adapter %s "
3112 "needs to be reopened\n",
3113 unit->port->wwpn, zfcp_get_busid_by_unit(unit));
3114 debug_text_event(adapter->erp_dbf, 2, "fsf_s_pboxed");
3115 zfcp_erp_port_boxed(unit->port);
3116 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR |
3117 ZFCP_STATUS_FSFREQ_RETRY;
3118 break;
3119
3120 case FSF_LUN_SHARING_VIOLATION:
3121 if (header->fsf_status_qual.word[0] != 0) {
3122 ZFCP_LOG_NORMAL("FCP-LUN 0x%Lx at the remote port "
3123 "with WWPN 0x%Lx "
3124 "connected to the adapter %s "
3125 "is already in use in LPAR%d, CSS%d\n",
3126 unit->fcp_lun,
3127 unit->port->wwpn,
3128 zfcp_get_busid_by_unit(unit),
3129 queue_designator->hla,
3130 queue_designator->cssid);
3131 } else {
3132 subtable = header->fsf_status_qual.halfword[4];
3133 rule = header->fsf_status_qual.halfword[5];
3134 switch (subtable) {
3135 case FSF_SQ_CFDC_SUBTABLE_OS:
3136 case FSF_SQ_CFDC_SUBTABLE_PORT_WWPN:
3137 case FSF_SQ_CFDC_SUBTABLE_PORT_DID:
3138 case FSF_SQ_CFDC_SUBTABLE_LUN:
3139 ZFCP_LOG_NORMAL("Access to FCP-LUN 0x%Lx at the "
3140 "remote port with WWPN 0x%Lx "
3141 "connected to the adapter %s "
3142 "is denied (%s rule %d)\n",
3143 unit->fcp_lun,
3144 unit->port->wwpn,
3145 zfcp_get_busid_by_unit(unit),
3146 zfcp_act_subtable_type[subtable],
3147 rule);
3148 break;
3149 }
3150 }
3151 ZFCP_LOG_DEBUG("status qualifier:\n");
3152 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
3153 (char *) &header->fsf_status_qual,
3154 sizeof (union fsf_status_qual));
3155 debug_text_event(adapter->erp_dbf, 2,
3156 "fsf_s_l_sh_vio");
3157 zfcp_erp_unit_access_denied(unit);
3158 atomic_clear_mask(ZFCP_STATUS_UNIT_SHARED, &unit->status);
3159 atomic_clear_mask(ZFCP_STATUS_UNIT_READONLY, &unit->status);
3160 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3161 break;
3162
3163 case FSF_MAXIMUM_NUMBER_OF_LUNS_EXCEEDED:
3164 ZFCP_LOG_INFO("error: The adapter ran out of resources. "
3165 "There is no handle (temporary port identifier) "
3166 "available for unit 0x%016Lx on port 0x%016Lx "
3167 "on adapter %s\n",
3168 unit->fcp_lun,
3169 unit->port->wwpn,
3170 zfcp_get_busid_by_unit(unit));
3171 debug_text_event(adapter->erp_dbf, 1,
3172 "fsf_s_max_units");
3173 zfcp_erp_unit_failed(unit);
3174 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3175 break;
3176
3177 case FSF_ADAPTER_STATUS_AVAILABLE:
3178 switch (header->fsf_status_qual.word[0]) {
3179 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
3180 /* Re-establish link to port */
3181 debug_text_event(adapter->erp_dbf, 1,
3182 "fsf_sq_ltest");
3183 zfcp_test_link(unit->port);
3184 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3185 break;
3186 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
3187 /* ERP strategy will escalate */
3188 debug_text_event(adapter->erp_dbf, 1,
3189 "fsf_sq_ulp");
3190 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3191 break;
3192 default:
3193 ZFCP_LOG_NORMAL
3194 ("bug: Wrong status qualifier 0x%x arrived.\n",
3195 header->fsf_status_qual.word[0]);
3196 debug_text_event(adapter->erp_dbf, 0,
3197 "fsf_sq_inval:");
3198 debug_exception(adapter->erp_dbf, 0,
3199 &header->fsf_status_qual.word[0],
3200 sizeof (u32));
3201 }
3202 break;
3203
3204 case FSF_INVALID_COMMAND_OPTION:
3205 ZFCP_LOG_NORMAL(
3206 "Invalid option 0x%x has been specified "
3207 "in QTCB bottom sent to the adapter %s\n",
3208 bottom->option,
3209 zfcp_get_busid_by_adapter(adapter));
3210 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3211 retval = -EINVAL;
3212 break;
3213
3214 case FSF_GOOD:
3215 /* save LUN handle assigned by FSF */
3216 unit->handle = header->lun_handle;
3217 ZFCP_LOG_TRACE("unit 0x%016Lx on remote port 0x%016Lx on "
3218 "adapter %s opened, port handle 0x%x\n",
3219 unit->fcp_lun,
3220 unit->port->wwpn,
3221 zfcp_get_busid_by_unit(unit),
3222 unit->handle);
3223 /* mark unit as open */
3224 atomic_set_mask(ZFCP_STATUS_COMMON_OPEN, &unit->status);
3225
3226 if (!(adapter->connection_features & FSF_FEATURE_NPIV_MODE) &&
3227 (adapter->adapter_features & FSF_FEATURE_LUN_SHARING) &&
3228 (adapter->ccw_device->id.dev_model != ZFCP_DEVICE_MODEL_PRIV)) {
3229 exclusive = (bottom->lun_access_info &
3230 FSF_UNIT_ACCESS_EXCLUSIVE);
3231 readwrite = (bottom->lun_access_info &
3232 FSF_UNIT_ACCESS_OUTBOUND_TRANSFER);
3233
3234 if (!exclusive)
3235 atomic_set_mask(ZFCP_STATUS_UNIT_SHARED,
3236 &unit->status);
3237
3238 if (!readwrite) {
3239 atomic_set_mask(ZFCP_STATUS_UNIT_READONLY,
3240 &unit->status);
3241 ZFCP_LOG_NORMAL("read-only access for unit "
3242 "(adapter %s, wwpn=0x%016Lx, "
3243 "fcp_lun=0x%016Lx)\n",
3244 zfcp_get_busid_by_unit(unit),
3245 unit->port->wwpn,
3246 unit->fcp_lun);
3247 }
3248
3249 if (exclusive && !readwrite) {
3250 ZFCP_LOG_NORMAL("exclusive access of read-only "
3251 "unit not supported\n");
3252 zfcp_erp_unit_failed(unit);
3253 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3254 zfcp_erp_unit_shutdown(unit, 0);
3255 } else if (!exclusive && readwrite) {
3256 ZFCP_LOG_NORMAL("shared access of read-write "
3257 "unit not supported\n");
3258 zfcp_erp_unit_failed(unit);
3259 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3260 zfcp_erp_unit_shutdown(unit, 0);
3261 }
3262 }
3263
3264 retval = 0;
3265 break;
3266
3267 default:
3268 ZFCP_LOG_NORMAL("bug: An unknown FSF Status was presented "
3269 "(debug info 0x%x)\n",
3270 header->fsf_status);
3271 debug_text_event(adapter->erp_dbf, 0, "fsf_s_inval:");
3272 debug_exception(adapter->erp_dbf, 0,
3273 &header->fsf_status, sizeof (u32));
3274 break;
3275 }
3276
3277 skip_fsfstatus:
3278 atomic_clear_mask(ZFCP_STATUS_COMMON_OPENING, &unit->status);
3279 return retval;
3280 }
3281
3282 /*
3283 * function: zfcp_fsf_close_unit
3284 *
3285 * purpose:
3286 *
3287 * returns: address of fsf_req - request successfully initiated
3288 * NULL -
3289 *
3290 * assumptions: This routine does not check whether the associated
3291 * remote port/lun has already been opened. This should be
3292 * done by calling routines. Otherwise some status
3293 * may be presented by FSF
3294 */
3295 int
3296 zfcp_fsf_close_unit(struct zfcp_erp_action *erp_action)
3297 {
3298 volatile struct qdio_buffer_element *sbale;
3299 unsigned long lock_flags;
3300 int retval = 0;
3301
3302 /* setup new FSF request */
3303 retval = zfcp_fsf_req_create(erp_action->adapter,
3304 FSF_QTCB_CLOSE_LUN,
3305 ZFCP_WAIT_FOR_SBAL | ZFCP_REQ_AUTO_CLEANUP,
3306 erp_action->adapter->pool.fsf_req_erp,
3307 &lock_flags, &(erp_action->fsf_req));
3308 if (retval < 0) {
3309 ZFCP_LOG_INFO("error: Could not create close unit request for "
3310 "unit 0x%016Lx on port 0x%016Lx on adapter %s.\n",
3311 erp_action->unit->fcp_lun,
3312 erp_action->port->wwpn,
3313 zfcp_get_busid_by_adapter(erp_action->adapter));
3314 goto out;
3315 }
3316
3317 sbale = zfcp_qdio_sbale_req(erp_action->fsf_req,
3318 erp_action->fsf_req->sbal_curr, 0);
3319 sbale[0].flags |= SBAL_FLAGS0_TYPE_READ;
3320 sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
3321
3322 erp_action->fsf_req->qtcb->header.port_handle =
3323 erp_action->port->handle;
3324 erp_action->fsf_req->qtcb->header.lun_handle = erp_action->unit->handle;
3325 atomic_set_mask(ZFCP_STATUS_COMMON_CLOSING, &erp_action->unit->status);
3326 erp_action->fsf_req->data = (unsigned long) erp_action->unit;
3327 erp_action->fsf_req->erp_action = erp_action;
3328
3329 /* start QDIO request for this FSF request */
3330 retval = zfcp_fsf_req_send(erp_action->fsf_req, &erp_action->timer);
3331 if (retval) {
3332 ZFCP_LOG_INFO("error: Could not send a close unit request for "
3333 "unit 0x%016Lx on port 0x%016Lx onadapter %s.\n",
3334 erp_action->unit->fcp_lun,
3335 erp_action->port->wwpn,
3336 zfcp_get_busid_by_adapter(erp_action->adapter));
3337 zfcp_fsf_req_free(erp_action->fsf_req);
3338 erp_action->fsf_req = NULL;
3339 goto out;
3340 }
3341
3342 ZFCP_LOG_TRACE("Close LUN request initiated (adapter %s, "
3343 "port 0x%016Lx, unit 0x%016Lx)\n",
3344 zfcp_get_busid_by_adapter(erp_action->adapter),
3345 erp_action->port->wwpn, erp_action->unit->fcp_lun);
3346 out:
3347 write_unlock_irqrestore(&erp_action->adapter->request_queue.queue_lock,
3348 lock_flags);
3349 return retval;
3350 }
3351
3352 /*
3353 * function: zfcp_fsf_close_unit_handler
3354 *
3355 * purpose: is called for finished Close LUN FSF command
3356 *
3357 * returns:
3358 */
3359 static int
3360 zfcp_fsf_close_unit_handler(struct zfcp_fsf_req *fsf_req)
3361 {
3362 int retval = -EINVAL;
3363 struct zfcp_unit *unit;
3364
3365 unit = (struct zfcp_unit *) fsf_req->data;
3366
3367 if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR) {
3368 /* don't change unit status in our bookkeeping */
3369 goto skip_fsfstatus;
3370 }
3371
3372 /* evaluate FSF status in QTCB */
3373 switch (fsf_req->qtcb->header.fsf_status) {
3374
3375 case FSF_PORT_HANDLE_NOT_VALID:
3376 ZFCP_LOG_INFO("Temporary port identifier 0x%x for port "
3377 "0x%016Lx on adapter %s invalid. This may "
3378 "happen in rare circumstances\n",
3379 unit->port->handle,
3380 unit->port->wwpn,
3381 zfcp_get_busid_by_unit(unit));
3382 ZFCP_LOG_DEBUG("status qualifier:\n");
3383 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
3384 (char *) &fsf_req->qtcb->header.fsf_status_qual,
3385 sizeof (union fsf_status_qual));
3386 debug_text_event(fsf_req->adapter->erp_dbf, 1,
3387 "fsf_s_phand_nv");
3388 zfcp_erp_adapter_reopen(unit->port->adapter, 0);
3389 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3390 break;
3391
3392 case FSF_LUN_HANDLE_NOT_VALID:
3393 ZFCP_LOG_INFO("Temporary LUN identifier 0x%x of unit "
3394 "0x%016Lx on port 0x%016Lx on adapter %s is "
3395 "invalid. This may happen occasionally.\n",
3396 unit->handle,
3397 unit->fcp_lun,
3398 unit->port->wwpn,
3399 zfcp_get_busid_by_unit(unit));
3400 ZFCP_LOG_DEBUG("Status qualifier data:\n");
3401 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
3402 (char *) &fsf_req->qtcb->header.fsf_status_qual,
3403 sizeof (union fsf_status_qual));
3404 debug_text_event(fsf_req->adapter->erp_dbf, 1,
3405 "fsf_s_lhand_nv");
3406 zfcp_erp_port_reopen(unit->port, 0);
3407 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3408 break;
3409
3410 case FSF_PORT_BOXED:
3411 ZFCP_LOG_DEBUG("The remote port 0x%016Lx on adapter %s "
3412 "needs to be reopened\n",
3413 unit->port->wwpn,
3414 zfcp_get_busid_by_unit(unit));
3415 debug_text_event(fsf_req->adapter->erp_dbf, 2, "fsf_s_pboxed");
3416 zfcp_erp_port_boxed(unit->port);
3417 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR |
3418 ZFCP_STATUS_FSFREQ_RETRY;
3419 break;
3420
3421 case FSF_ADAPTER_STATUS_AVAILABLE:
3422 switch (fsf_req->qtcb->header.fsf_status_qual.word[0]) {
3423 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
3424 /* re-establish link to port */
3425 debug_text_event(fsf_req->adapter->erp_dbf, 1,
3426 "fsf_sq_ltest");
3427 zfcp_test_link(unit->port);
3428 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3429 break;
3430 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
3431 /* ERP strategy will escalate */
3432 debug_text_event(fsf_req->adapter->erp_dbf, 1,
3433 "fsf_sq_ulp");
3434 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3435 break;
3436 default:
3437 ZFCP_LOG_NORMAL
3438 ("bug: Wrong status qualifier 0x%x arrived.\n",
3439 fsf_req->qtcb->header.fsf_status_qual.word[0]);
3440 debug_text_event(fsf_req->adapter->erp_dbf, 0,
3441 "fsf_sq_inval:");
3442 debug_exception(
3443 fsf_req->adapter->erp_dbf, 0,
3444 &fsf_req->qtcb->header.fsf_status_qual.word[0],
3445 sizeof (u32));
3446 break;
3447 }
3448 break;
3449
3450 case FSF_GOOD:
3451 ZFCP_LOG_TRACE("unit 0x%016Lx on port 0x%016Lx on adapter %s "
3452 "closed, port handle 0x%x\n",
3453 unit->fcp_lun,
3454 unit->port->wwpn,
3455 zfcp_get_busid_by_unit(unit),
3456 unit->handle);
3457 /* mark unit as closed */
3458 atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN, &unit->status);
3459 retval = 0;
3460 break;
3461
3462 default:
3463 ZFCP_LOG_NORMAL("bug: An unknown FSF Status was presented "
3464 "(debug info 0x%x)\n",
3465 fsf_req->qtcb->header.fsf_status);
3466 debug_text_event(fsf_req->adapter->erp_dbf, 0, "fsf_s_inval:");
3467 debug_exception(fsf_req->adapter->erp_dbf, 0,
3468 &fsf_req->qtcb->header.fsf_status,
3469 sizeof (u32));
3470 break;
3471 }
3472
3473 skip_fsfstatus:
3474 atomic_clear_mask(ZFCP_STATUS_COMMON_CLOSING, &unit->status);
3475 return retval;
3476 }
3477
3478 /**
3479 * zfcp_fsf_send_fcp_command_task - initiate an FCP command (for a SCSI command)
3480 * @adapter: adapter where scsi command is issued
3481 * @unit: unit where command is sent to
3482 * @scsi_cmnd: scsi command to be sent
3483 * @timer: timer to be started when request is initiated
3484 * @req_flags: flags for fsf_request
3485 */
3486 int
3487 zfcp_fsf_send_fcp_command_task(struct zfcp_adapter *adapter,
3488 struct zfcp_unit *unit,
3489 struct scsi_cmnd * scsi_cmnd,
3490 struct timer_list *timer, int req_flags)
3491 {
3492 struct zfcp_fsf_req *fsf_req = NULL;
3493 struct fcp_cmnd_iu *fcp_cmnd_iu;
3494 unsigned int sbtype;
3495 unsigned long lock_flags;
3496 int real_bytes = 0;
3497 int retval = 0;
3498 int mask;
3499
3500 /* setup new FSF request */
3501 retval = zfcp_fsf_req_create(adapter, FSF_QTCB_FCP_CMND, req_flags,
3502 adapter->pool.fsf_req_scsi,
3503 &lock_flags, &fsf_req);
3504 if (unlikely(retval < 0)) {
3505 ZFCP_LOG_DEBUG("error: Could not create FCP command request "
3506 "for unit 0x%016Lx on port 0x%016Lx on "
3507 "adapter %s\n",
3508 unit->fcp_lun,
3509 unit->port->wwpn,
3510 zfcp_get_busid_by_adapter(adapter));
3511 goto failed_req_create;
3512 }
3513
3514 zfcp_unit_get(unit);
3515 fsf_req->unit = unit;
3516
3517 /* associate FSF request with SCSI request (for look up on abort) */
3518 scsi_cmnd->host_scribble = (char *) fsf_req;
3519
3520 /* associate SCSI command with FSF request */
3521 fsf_req->data = (unsigned long) scsi_cmnd;
3522
3523 /* set handles of unit and its parent port in QTCB */
3524 fsf_req->qtcb->header.lun_handle = unit->handle;
3525 fsf_req->qtcb->header.port_handle = unit->port->handle;
3526
3527 /* FSF does not define the structure of the FCP_CMND IU */
3528 fcp_cmnd_iu = (struct fcp_cmnd_iu *)
3529 &(fsf_req->qtcb->bottom.io.fcp_cmnd);
3530
3531 /*
3532 * set depending on data direction:
3533 * data direction bits in SBALE (SB Type)
3534 * data direction bits in QTCB
3535 * data direction bits in FCP_CMND IU
3536 */
3537 switch (scsi_cmnd->sc_data_direction) {
3538 case DMA_NONE:
3539 fsf_req->qtcb->bottom.io.data_direction = FSF_DATADIR_CMND;
3540 /*
3541 * FIXME(qdio):
3542 * what is the correct type for commands
3543 * without 'real' data buffers?
3544 */
3545 sbtype = SBAL_FLAGS0_TYPE_READ;
3546 break;
3547 case DMA_FROM_DEVICE:
3548 fsf_req->qtcb->bottom.io.data_direction = FSF_DATADIR_READ;
3549 sbtype = SBAL_FLAGS0_TYPE_READ;
3550 fcp_cmnd_iu->rddata = 1;
3551 break;
3552 case DMA_TO_DEVICE:
3553 fsf_req->qtcb->bottom.io.data_direction = FSF_DATADIR_WRITE;
3554 sbtype = SBAL_FLAGS0_TYPE_WRITE;
3555 fcp_cmnd_iu->wddata = 1;
3556 break;
3557 case DMA_BIDIRECTIONAL:
3558 default:
3559 /*
3560 * dummy, catch this condition earlier
3561 * in zfcp_scsi_queuecommand
3562 */
3563 goto failed_scsi_cmnd;
3564 }
3565
3566 /* set FC service class in QTCB (3 per default) */
3567 fsf_req->qtcb->bottom.io.service_class = ZFCP_FC_SERVICE_CLASS_DEFAULT;
3568
3569 /* set FCP_LUN in FCP_CMND IU in QTCB */
3570 fcp_cmnd_iu->fcp_lun = unit->fcp_lun;
3571
3572 mask = ZFCP_STATUS_UNIT_READONLY | ZFCP_STATUS_UNIT_SHARED;
3573
3574 /* set task attributes in FCP_CMND IU in QTCB */
3575 if (likely((scsi_cmnd->device->simple_tags) ||
3576 (atomic_test_mask(mask, &unit->status))))
3577 fcp_cmnd_iu->task_attribute = SIMPLE_Q;
3578 else
3579 fcp_cmnd_iu->task_attribute = UNTAGGED;
3580
3581 /* set additional length of FCP_CDB in FCP_CMND IU in QTCB, if needed */
3582 if (unlikely(scsi_cmnd->cmd_len > FCP_CDB_LENGTH)) {
3583 fcp_cmnd_iu->add_fcp_cdb_length
3584 = (scsi_cmnd->cmd_len - FCP_CDB_LENGTH) >> 2;
3585 ZFCP_LOG_TRACE("SCSI CDB length is 0x%x, "
3586 "additional FCP_CDB length is 0x%x "
3587 "(shifted right 2 bits)\n",
3588 scsi_cmnd->cmd_len,
3589 fcp_cmnd_iu->add_fcp_cdb_length);
3590 }
3591 /*
3592 * copy SCSI CDB (including additional length, if any) to
3593 * FCP_CDB in FCP_CMND IU in QTCB
3594 */
3595 memcpy(fcp_cmnd_iu->fcp_cdb, scsi_cmnd->cmnd, scsi_cmnd->cmd_len);
3596
3597 /* FCP CMND IU length in QTCB */
3598 fsf_req->qtcb->bottom.io.fcp_cmnd_length =
3599 sizeof (struct fcp_cmnd_iu) +
3600 fcp_cmnd_iu->add_fcp_cdb_length + sizeof (fcp_dl_t);
3601
3602 /* generate SBALEs from data buffer */
3603 real_bytes = zfcp_qdio_sbals_from_scsicmnd(fsf_req, sbtype, scsi_cmnd);
3604 if (unlikely(real_bytes < 0)) {
3605 if (fsf_req->sbal_number < ZFCP_MAX_SBALS_PER_REQ) {
3606 ZFCP_LOG_DEBUG(
3607 "Data did not fit into available buffer(s), "
3608 "waiting for more...\n");
3609 retval = -EIO;
3610 } else {
3611 ZFCP_LOG_NORMAL("error: No truncation implemented but "
3612 "required. Shutting down unit "
3613 "(adapter %s, port 0x%016Lx, "
3614 "unit 0x%016Lx)\n",
3615 zfcp_get_busid_by_unit(unit),
3616 unit->port->wwpn,
3617 unit->fcp_lun);
3618 zfcp_erp_unit_shutdown(unit, 0);
3619 retval = -EINVAL;
3620 }
3621 goto no_fit;
3622 }
3623
3624 /* set length of FCP data length in FCP_CMND IU in QTCB */
3625 zfcp_set_fcp_dl(fcp_cmnd_iu, real_bytes);
3626
3627 ZFCP_LOG_DEBUG("Sending SCSI command:\n");
3628 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
3629 (char *) scsi_cmnd->cmnd, scsi_cmnd->cmd_len);
3630
3631 /*
3632 * start QDIO request for this FSF request
3633 * covered by an SBALE)
3634 */
3635 retval = zfcp_fsf_req_send(fsf_req, timer);
3636 if (unlikely(retval < 0)) {
3637 ZFCP_LOG_INFO("error: Could not send FCP command request "
3638 "on adapter %s, port 0x%016Lx, unit 0x%016Lx\n",
3639 zfcp_get_busid_by_adapter(adapter),
3640 unit->port->wwpn,
3641 unit->fcp_lun);
3642 goto send_failed;
3643 }
3644
3645 ZFCP_LOG_TRACE("Send FCP Command initiated (adapter %s, "
3646 "port 0x%016Lx, unit 0x%016Lx)\n",
3647 zfcp_get_busid_by_adapter(adapter),
3648 unit->port->wwpn,
3649 unit->fcp_lun);
3650 goto success;
3651
3652 send_failed:
3653 no_fit:
3654 failed_scsi_cmnd:
3655 zfcp_unit_put(unit);
3656 zfcp_fsf_req_free(fsf_req);
3657 fsf_req = NULL;
3658 scsi_cmnd->host_scribble = NULL;
3659 success:
3660 failed_req_create:
3661 write_unlock_irqrestore(&adapter->request_queue.queue_lock, lock_flags);
3662 return retval;
3663 }
3664
3665 struct zfcp_fsf_req *
3666 zfcp_fsf_send_fcp_command_task_management(struct zfcp_adapter *adapter,
3667 struct zfcp_unit *unit,
3668 u8 tm_flags, int req_flags)
3669 {
3670 struct zfcp_fsf_req *fsf_req = NULL;
3671 int retval = 0;
3672 struct fcp_cmnd_iu *fcp_cmnd_iu;
3673 unsigned long lock_flags;
3674 volatile struct qdio_buffer_element *sbale;
3675
3676 /* setup new FSF request */
3677 retval = zfcp_fsf_req_create(adapter, FSF_QTCB_FCP_CMND, req_flags,
3678 adapter->pool.fsf_req_scsi,
3679 &lock_flags, &fsf_req);
3680 if (retval < 0) {
3681 ZFCP_LOG_INFO("error: Could not create FCP command (task "
3682 "management) request for adapter %s, port "
3683 " 0x%016Lx, unit 0x%016Lx.\n",
3684 zfcp_get_busid_by_adapter(adapter),
3685 unit->port->wwpn, unit->fcp_lun);
3686 goto out;
3687 }
3688
3689 /*
3690 * Used to decide on proper handler in the return path,
3691 * could be either zfcp_fsf_send_fcp_command_task_handler or
3692 * zfcp_fsf_send_fcp_command_task_management_handler */
3693
3694 fsf_req->status |= ZFCP_STATUS_FSFREQ_TASK_MANAGEMENT;
3695
3696 /*
3697 * hold a pointer to the unit being target of this
3698 * task management request
3699 */
3700 fsf_req->data = (unsigned long) unit;
3701
3702 /* set FSF related fields in QTCB */
3703 fsf_req->qtcb->header.lun_handle = unit->handle;
3704 fsf_req->qtcb->header.port_handle = unit->port->handle;
3705 fsf_req->qtcb->bottom.io.data_direction = FSF_DATADIR_CMND;
3706 fsf_req->qtcb->bottom.io.service_class = ZFCP_FC_SERVICE_CLASS_DEFAULT;
3707 fsf_req->qtcb->bottom.io.fcp_cmnd_length =
3708 sizeof (struct fcp_cmnd_iu) + sizeof (fcp_dl_t);
3709
3710 sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
3711 sbale[0].flags |= SBAL_FLAGS0_TYPE_WRITE;
3712 sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
3713
3714 /* set FCP related fields in FCP_CMND IU in QTCB */
3715 fcp_cmnd_iu = (struct fcp_cmnd_iu *)
3716 &(fsf_req->qtcb->bottom.io.fcp_cmnd);
3717 fcp_cmnd_iu->fcp_lun = unit->fcp_lun;
3718 fcp_cmnd_iu->task_management_flags = tm_flags;
3719
3720 /* start QDIO request for this FSF request */
3721 zfcp_fsf_start_scsi_er_timer(adapter);
3722 retval = zfcp_fsf_req_send(fsf_req, NULL);
3723 if (retval) {
3724 del_timer(&adapter->scsi_er_timer);
3725 ZFCP_LOG_INFO("error: Could not send an FCP-command (task "
3726 "management) on adapter %s, port 0x%016Lx for "
3727 "unit LUN 0x%016Lx\n",
3728 zfcp_get_busid_by_adapter(adapter),
3729 unit->port->wwpn,
3730 unit->fcp_lun);
3731 zfcp_fsf_req_free(fsf_req);
3732 fsf_req = NULL;
3733 goto out;
3734 }
3735
3736 ZFCP_LOG_TRACE("Send FCP Command (task management function) initiated "
3737 "(adapter %s, port 0x%016Lx, unit 0x%016Lx, "
3738 "tm_flags=0x%x)\n",
3739 zfcp_get_busid_by_adapter(adapter),
3740 unit->port->wwpn,
3741 unit->fcp_lun,
3742 tm_flags);
3743 out:
3744 write_unlock_irqrestore(&adapter->request_queue.queue_lock, lock_flags);
3745 return fsf_req;
3746 }
3747
3748 /*
3749 * function: zfcp_fsf_send_fcp_command_handler
3750 *
3751 * purpose: is called for finished Send FCP Command
3752 *
3753 * returns:
3754 */
3755 static int
3756 zfcp_fsf_send_fcp_command_handler(struct zfcp_fsf_req *fsf_req)
3757 {
3758 int retval = -EINVAL;
3759 struct zfcp_unit *unit;
3760 struct fsf_qtcb_header *header;
3761 u16 subtable, rule, counter;
3762
3763 header = &fsf_req->qtcb->header;
3764
3765 if (unlikely(fsf_req->status & ZFCP_STATUS_FSFREQ_TASK_MANAGEMENT))
3766 unit = (struct zfcp_unit *) fsf_req->data;
3767 else
3768 unit = fsf_req->unit;
3769
3770 if (unlikely(fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR)) {
3771 /* go directly to calls of special handlers */
3772 goto skip_fsfstatus;
3773 }
3774
3775 /* evaluate FSF status in QTCB */
3776 switch (header->fsf_status) {
3777
3778 case FSF_PORT_HANDLE_NOT_VALID:
3779 ZFCP_LOG_INFO("Temporary port identifier 0x%x for port "
3780 "0x%016Lx on adapter %s invalid\n",
3781 unit->port->handle,
3782 unit->port->wwpn, zfcp_get_busid_by_unit(unit));
3783 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
3784 (char *) &header->fsf_status_qual,
3785 sizeof (union fsf_status_qual));
3786 debug_text_event(fsf_req->adapter->erp_dbf, 1,
3787 "fsf_s_phand_nv");
3788 zfcp_erp_adapter_reopen(unit->port->adapter, 0);
3789 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3790 break;
3791
3792 case FSF_LUN_HANDLE_NOT_VALID:
3793 ZFCP_LOG_INFO("Temporary LUN identifier 0x%x for unit "
3794 "0x%016Lx on port 0x%016Lx on adapter %s is "
3795 "invalid. This may happen occasionally.\n",
3796 unit->handle,
3797 unit->fcp_lun,
3798 unit->port->wwpn,
3799 zfcp_get_busid_by_unit(unit));
3800 ZFCP_LOG_NORMAL("Status qualifier data:\n");
3801 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_NORMAL,
3802 (char *) &header->fsf_status_qual,
3803 sizeof (union fsf_status_qual));
3804 debug_text_event(fsf_req->adapter->erp_dbf, 1,
3805 "fsf_s_uhand_nv");
3806 zfcp_erp_port_reopen(unit->port, 0);
3807 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3808 break;
3809
3810 case FSF_HANDLE_MISMATCH:
3811 ZFCP_LOG_NORMAL("bug: The port handle 0x%x has changed "
3812 "unexpectedly. (adapter %s, port 0x%016Lx, "
3813 "unit 0x%016Lx)\n",
3814 unit->port->handle,
3815 zfcp_get_busid_by_unit(unit),
3816 unit->port->wwpn,
3817 unit->fcp_lun);
3818 ZFCP_LOG_NORMAL("status qualifier:\n");
3819 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_NORMAL,
3820 (char *) &header->fsf_status_qual,
3821 sizeof (union fsf_status_qual));
3822 debug_text_event(fsf_req->adapter->erp_dbf, 1,
3823 "fsf_s_hand_mis");
3824 zfcp_erp_adapter_reopen(unit->port->adapter, 0);
3825 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3826 break;
3827
3828 case FSF_SERVICE_CLASS_NOT_SUPPORTED:
3829 ZFCP_LOG_INFO("error: adapter %s does not support fc "
3830 "class %d.\n",
3831 zfcp_get_busid_by_unit(unit),
3832 ZFCP_FC_SERVICE_CLASS_DEFAULT);
3833 /* stop operation for this adapter */
3834 debug_text_exception(fsf_req->adapter->erp_dbf, 0,
3835 "fsf_s_class_nsup");
3836 zfcp_erp_adapter_shutdown(unit->port->adapter, 0);
3837 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3838 break;
3839
3840 case FSF_FCPLUN_NOT_VALID:
3841 ZFCP_LOG_NORMAL("bug: unit 0x%016Lx on port 0x%016Lx on "
3842 "adapter %s does not have correct unit "
3843 "handle 0x%x\n",
3844 unit->fcp_lun,
3845 unit->port->wwpn,
3846 zfcp_get_busid_by_unit(unit),
3847 unit->handle);
3848 ZFCP_LOG_DEBUG("status qualifier:\n");
3849 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
3850 (char *) &header->fsf_status_qual,
3851 sizeof (union fsf_status_qual));
3852 debug_text_event(fsf_req->adapter->erp_dbf, 1,
3853 "fsf_s_fcp_lun_nv");
3854 zfcp_erp_port_reopen(unit->port, 0);
3855 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3856 break;
3857
3858 case FSF_ACCESS_DENIED:
3859 ZFCP_LOG_NORMAL("Access denied, cannot send FCP command to "
3860 "unit 0x%016Lx on port 0x%016Lx on "
3861 "adapter %s\n", unit->fcp_lun, unit->port->wwpn,
3862 zfcp_get_busid_by_unit(unit));
3863 for (counter = 0; counter < 2; counter++) {
3864 subtable = header->fsf_status_qual.halfword[counter * 2];
3865 rule = header->fsf_status_qual.halfword[counter * 2 + 1];
3866 switch (subtable) {
3867 case FSF_SQ_CFDC_SUBTABLE_OS:
3868 case FSF_SQ_CFDC_SUBTABLE_PORT_WWPN:
3869 case FSF_SQ_CFDC_SUBTABLE_PORT_DID:
3870 case FSF_SQ_CFDC_SUBTABLE_LUN:
3871 ZFCP_LOG_INFO("Access denied (%s rule %d)\n",
3872 zfcp_act_subtable_type[subtable], rule);
3873 break;
3874 }
3875 }
3876 debug_text_event(fsf_req->adapter->erp_dbf, 1, "fsf_s_access");
3877 zfcp_erp_unit_access_denied(unit);
3878 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3879 break;
3880
3881 case FSF_DIRECTION_INDICATOR_NOT_VALID:
3882 ZFCP_LOG_INFO("bug: Invalid data direction given for unit "
3883 "0x%016Lx on port 0x%016Lx on adapter %s "
3884 "(debug info %d)\n",
3885 unit->fcp_lun,
3886 unit->port->wwpn,
3887 zfcp_get_busid_by_unit(unit),
3888 fsf_req->qtcb->bottom.io.data_direction);
3889 /* stop operation for this adapter */
3890 debug_text_event(fsf_req->adapter->erp_dbf, 0,
3891 "fsf_s_dir_ind_nv");
3892 zfcp_erp_adapter_shutdown(unit->port->adapter, 0);
3893 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3894 break;
3895
3896 case FSF_CMND_LENGTH_NOT_VALID:
3897 ZFCP_LOG_NORMAL
3898 ("bug: An invalid control-data-block length field "
3899 "was found in a command for unit 0x%016Lx on port "
3900 "0x%016Lx on adapter %s " "(debug info %d)\n",
3901 unit->fcp_lun, unit->port->wwpn,
3902 zfcp_get_busid_by_unit(unit),
3903 fsf_req->qtcb->bottom.io.fcp_cmnd_length);
3904 /* stop operation for this adapter */
3905 debug_text_event(fsf_req->adapter->erp_dbf, 0,
3906 "fsf_s_cmd_len_nv");
3907 zfcp_erp_adapter_shutdown(unit->port->adapter, 0);
3908 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3909 break;
3910
3911 case FSF_PORT_BOXED:
3912 ZFCP_LOG_DEBUG("The remote port 0x%016Lx on adapter %s "
3913 "needs to be reopened\n",
3914 unit->port->wwpn, zfcp_get_busid_by_unit(unit));
3915 debug_text_event(fsf_req->adapter->erp_dbf, 2, "fsf_s_pboxed");
3916 zfcp_erp_port_boxed(unit->port);
3917 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR |
3918 ZFCP_STATUS_FSFREQ_RETRY;
3919 break;
3920
3921 case FSF_LUN_BOXED:
3922 ZFCP_LOG_NORMAL("unit needs to be reopened (adapter %s, "
3923 "wwpn=0x%016Lx, fcp_lun=0x%016Lx)\n",
3924 zfcp_get_busid_by_unit(unit),
3925 unit->port->wwpn, unit->fcp_lun);
3926 debug_text_event(fsf_req->adapter->erp_dbf, 1, "fsf_s_lboxed");
3927 zfcp_erp_unit_boxed(unit);
3928 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR
3929 | ZFCP_STATUS_FSFREQ_RETRY;
3930 break;
3931
3932 case FSF_ADAPTER_STATUS_AVAILABLE:
3933 switch (header->fsf_status_qual.word[0]) {
3934 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
3935 /* re-establish link to port */
3936 debug_text_event(fsf_req->adapter->erp_dbf, 1,
3937 "fsf_sq_ltest");
3938 zfcp_test_link(unit->port);
3939 break;
3940 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
3941 /* FIXME(hw) need proper specs for proper action */
3942 /* let scsi stack deal with retries and escalation */
3943 debug_text_event(fsf_req->adapter->erp_dbf, 1,
3944 "fsf_sq_ulp");
3945 break;
3946 default:
3947 ZFCP_LOG_NORMAL
3948 ("Unknown status qualifier 0x%x arrived.\n",
3949 header->fsf_status_qual.word[0]);
3950 debug_text_event(fsf_req->adapter->erp_dbf, 0,
3951 "fsf_sq_inval:");
3952 debug_exception(fsf_req->adapter->erp_dbf, 0,
3953 &header->fsf_status_qual.word[0],
3954 sizeof(u32));
3955 break;
3956 }
3957 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
3958 break;
3959
3960 case FSF_GOOD:
3961 break;
3962
3963 case FSF_FCP_RSP_AVAILABLE:
3964 break;
3965
3966 default:
3967 debug_text_event(fsf_req->adapter->erp_dbf, 0, "fsf_s_inval:");
3968 debug_exception(fsf_req->adapter->erp_dbf, 0,
3969 &header->fsf_status, sizeof(u32));
3970 break;
3971 }
3972
3973 skip_fsfstatus:
3974 if (fsf_req->status & ZFCP_STATUS_FSFREQ_TASK_MANAGEMENT) {
3975 retval =
3976 zfcp_fsf_send_fcp_command_task_management_handler(fsf_req);
3977 } else {
3978 retval = zfcp_fsf_send_fcp_command_task_handler(fsf_req);
3979 fsf_req->unit = NULL;
3980 zfcp_unit_put(unit);
3981 }
3982 return retval;
3983 }
3984
3985 /*
3986 * function: zfcp_fsf_send_fcp_command_task_handler
3987 *
3988 * purpose: evaluates FCP_RSP IU
3989 *
3990 * returns:
3991 */
3992 static int
3993 zfcp_fsf_send_fcp_command_task_handler(struct zfcp_fsf_req *fsf_req)
3994 {
3995 int retval = 0;
3996 struct scsi_cmnd *scpnt;
3997 struct fcp_rsp_iu *fcp_rsp_iu = (struct fcp_rsp_iu *)
3998 &(fsf_req->qtcb->bottom.io.fcp_rsp);
3999 struct fcp_cmnd_iu *fcp_cmnd_iu = (struct fcp_cmnd_iu *)
4000 &(fsf_req->qtcb->bottom.io.fcp_cmnd);
4001 u32 sns_len;
4002 char *fcp_rsp_info = zfcp_get_fcp_rsp_info_ptr(fcp_rsp_iu);
4003 unsigned long flags;
4004 struct zfcp_unit *unit = fsf_req->unit;
4005
4006 read_lock_irqsave(&fsf_req->adapter->abort_lock, flags);
4007 scpnt = (struct scsi_cmnd *) fsf_req->data;
4008 if (unlikely(!scpnt)) {
4009 ZFCP_LOG_DEBUG
4010 ("Command with fsf_req %p is not associated to "
4011 "a scsi command anymore. Aborted?\n", fsf_req);
4012 goto out;
4013 }
4014 if (unlikely(fsf_req->status & ZFCP_STATUS_FSFREQ_ABORTED)) {
4015 /* FIXME: (design) mid-layer should handle DID_ABORT like
4016 * DID_SOFT_ERROR by retrying the request for devices
4017 * that allow retries.
4018 */
4019 ZFCP_LOG_DEBUG("Setting DID_SOFT_ERROR and SUGGEST_RETRY\n");
4020 set_host_byte(&scpnt->result, DID_SOFT_ERROR);
4021 set_driver_byte(&scpnt->result, SUGGEST_RETRY);
4022 goto skip_fsfstatus;
4023 }
4024
4025 if (unlikely(fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR)) {
4026 ZFCP_LOG_DEBUG("Setting DID_ERROR\n");
4027 set_host_byte(&scpnt->result, DID_ERROR);
4028 goto skip_fsfstatus;
4029 }
4030
4031 /* set message byte of result in SCSI command */
4032 scpnt->result |= COMMAND_COMPLETE << 8;
4033
4034 /*
4035 * copy SCSI status code of FCP_STATUS of FCP_RSP IU to status byte
4036 * of result in SCSI command
4037 */
4038 scpnt->result |= fcp_rsp_iu->scsi_status;
4039 if (unlikely(fcp_rsp_iu->scsi_status)) {
4040 /* DEBUG */
4041 ZFCP_LOG_DEBUG("status for SCSI Command:\n");
4042 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
4043 scpnt->cmnd, scpnt->cmd_len);
4044 ZFCP_LOG_DEBUG("SCSI status code 0x%x\n",
4045 fcp_rsp_iu->scsi_status);
4046 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
4047 (void *) fcp_rsp_iu, sizeof (struct fcp_rsp_iu));
4048 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
4049 zfcp_get_fcp_sns_info_ptr(fcp_rsp_iu),
4050 fcp_rsp_iu->fcp_sns_len);
4051 }
4052
4053 /* check FCP_RSP_INFO */
4054 if (unlikely(fcp_rsp_iu->validity.bits.fcp_rsp_len_valid)) {
4055 ZFCP_LOG_DEBUG("rsp_len is valid\n");
4056 switch (fcp_rsp_info[3]) {
4057 case RSP_CODE_GOOD:
4058 /* ok, continue */
4059 ZFCP_LOG_TRACE("no failure or Task Management "
4060 "Function complete\n");
4061 set_host_byte(&scpnt->result, DID_OK);
4062 break;
4063 case RSP_CODE_LENGTH_MISMATCH:
4064 /* hardware bug */
4065 ZFCP_LOG_NORMAL("bug: FCP response code indictates "
4066 "that the fibrechannel protocol data "
4067 "length differs from the burst length. "
4068 "The problem occured on unit 0x%016Lx "
4069 "on port 0x%016Lx on adapter %s",
4070 unit->fcp_lun,
4071 unit->port->wwpn,
4072 zfcp_get_busid_by_unit(unit));
4073 /* dump SCSI CDB as prepared by zfcp */
4074 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
4075 (char *) &fsf_req->qtcb->
4076 bottom.io.fcp_cmnd, FSF_FCP_CMND_SIZE);
4077 set_host_byte(&scpnt->result, DID_ERROR);
4078 goto skip_fsfstatus;
4079 case RSP_CODE_FIELD_INVALID:
4080 /* driver or hardware bug */
4081 ZFCP_LOG_NORMAL("bug: FCP response code indictates "
4082 "that the fibrechannel protocol data "
4083 "fields were incorrectly set up. "
4084 "The problem occured on the unit "
4085 "0x%016Lx on port 0x%016Lx on "
4086 "adapter %s",
4087 unit->fcp_lun,
4088 unit->port->wwpn,
4089 zfcp_get_busid_by_unit(unit));
4090 /* dump SCSI CDB as prepared by zfcp */
4091 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
4092 (char *) &fsf_req->qtcb->
4093 bottom.io.fcp_cmnd, FSF_FCP_CMND_SIZE);
4094 set_host_byte(&scpnt->result, DID_ERROR);
4095 goto skip_fsfstatus;
4096 case RSP_CODE_RO_MISMATCH:
4097 /* hardware bug */
4098 ZFCP_LOG_NORMAL("bug: The FCP response code indicates "
4099 "that conflicting values for the "
4100 "fibrechannel payload offset from the "
4101 "header were found. "
4102 "The problem occured on unit 0x%016Lx "
4103 "on port 0x%016Lx on adapter %s.\n",
4104 unit->fcp_lun,
4105 unit->port->wwpn,
4106 zfcp_get_busid_by_unit(unit));
4107 /* dump SCSI CDB as prepared by zfcp */
4108 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
4109 (char *) &fsf_req->qtcb->
4110 bottom.io.fcp_cmnd, FSF_FCP_CMND_SIZE);
4111 set_host_byte(&scpnt->result, DID_ERROR);
4112 goto skip_fsfstatus;
4113 default:
4114 ZFCP_LOG_NORMAL("bug: An invalid FCP response "
4115 "code was detected for a command. "
4116 "The problem occured on the unit "
4117 "0x%016Lx on port 0x%016Lx on "
4118 "adapter %s (debug info 0x%x)\n",
4119 unit->fcp_lun,
4120 unit->port->wwpn,
4121 zfcp_get_busid_by_unit(unit),
4122 fcp_rsp_info[3]);
4123 /* dump SCSI CDB as prepared by zfcp */
4124 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_DEBUG,
4125 (char *) &fsf_req->qtcb->
4126 bottom.io.fcp_cmnd, FSF_FCP_CMND_SIZE);
4127 set_host_byte(&scpnt->result, DID_ERROR);
4128 goto skip_fsfstatus;
4129 }
4130 }
4131
4132 /* check for sense data */
4133 if (unlikely(fcp_rsp_iu->validity.bits.fcp_sns_len_valid)) {
4134 sns_len = FSF_FCP_RSP_SIZE -
4135 sizeof (struct fcp_rsp_iu) + fcp_rsp_iu->fcp_rsp_len;
4136 ZFCP_LOG_TRACE("room for %i bytes sense data in QTCB\n",
4137 sns_len);
4138 sns_len = min(sns_len, (u32) SCSI_SENSE_BUFFERSIZE);
4139 ZFCP_LOG_TRACE("room for %i bytes sense data in SCSI command\n",
4140 SCSI_SENSE_BUFFERSIZE);
4141 sns_len = min(sns_len, fcp_rsp_iu->fcp_sns_len);
4142 ZFCP_LOG_TRACE("scpnt->result =0x%x, command was:\n",
4143 scpnt->result);
4144 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_TRACE,
4145 (void *) &scpnt->cmnd, scpnt->cmd_len);
4146
4147 ZFCP_LOG_TRACE("%i bytes sense data provided by FCP\n",
4148 fcp_rsp_iu->fcp_sns_len);
4149 memcpy(&scpnt->sense_buffer,
4150 zfcp_get_fcp_sns_info_ptr(fcp_rsp_iu), sns_len);
4151 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_TRACE,
4152 (void *) &scpnt->sense_buffer, sns_len);
4153 }
4154
4155 /* check for overrun */
4156 if (unlikely(fcp_rsp_iu->validity.bits.fcp_resid_over)) {
4157 ZFCP_LOG_INFO("A data overrun was detected for a command. "
4158 "unit 0x%016Lx, port 0x%016Lx, adapter %s. "
4159 "The response data length is "
4160 "%d, the original length was %d.\n",
4161 unit->fcp_lun,
4162 unit->port->wwpn,
4163 zfcp_get_busid_by_unit(unit),
4164 fcp_rsp_iu->fcp_resid,
4165 (int) zfcp_get_fcp_dl(fcp_cmnd_iu));
4166 }
4167
4168 /* check for underrun */
4169 if (unlikely(fcp_rsp_iu->validity.bits.fcp_resid_under)) {
4170 ZFCP_LOG_INFO("A data underrun was detected for a command. "
4171 "unit 0x%016Lx, port 0x%016Lx, adapter %s. "
4172 "The response data length is "
4173 "%d, the original length was %d.\n",
4174 unit->fcp_lun,
4175 unit->port->wwpn,
4176 zfcp_get_busid_by_unit(unit),
4177 fcp_rsp_iu->fcp_resid,
4178 (int) zfcp_get_fcp_dl(fcp_cmnd_iu));
4179
4180 scpnt->resid = fcp_rsp_iu->fcp_resid;
4181 if (scpnt->request_bufflen - scpnt->resid < scpnt->underflow)
4182 set_host_byte(&scpnt->result, DID_ERROR);
4183 }
4184
4185 skip_fsfstatus:
4186 ZFCP_LOG_DEBUG("scpnt->result =0x%x\n", scpnt->result);
4187
4188 if (scpnt->result != 0)
4189 zfcp_scsi_dbf_event_result("erro", 3, fsf_req->adapter, scpnt, fsf_req);
4190 else if (scpnt->retries > 0)
4191 zfcp_scsi_dbf_event_result("retr", 4, fsf_req->adapter, scpnt, fsf_req);
4192 else
4193 zfcp_scsi_dbf_event_result("norm", 6, fsf_req->adapter, scpnt, fsf_req);
4194
4195 /* cleanup pointer (need this especially for abort) */
4196 scpnt->host_scribble = NULL;
4197
4198 /* always call back */
4199 (scpnt->scsi_done) (scpnt);
4200
4201 /*
4202 * We must hold this lock until scsi_done has been called.
4203 * Otherwise we may call scsi_done after abort regarding this
4204 * command has completed.
4205 * Note: scsi_done must not block!
4206 */
4207 out:
4208 read_unlock_irqrestore(&fsf_req->adapter->abort_lock, flags);
4209 return retval;
4210 }
4211
4212 /*
4213 * function: zfcp_fsf_send_fcp_command_task_management_handler
4214 *
4215 * purpose: evaluates FCP_RSP IU
4216 *
4217 * returns:
4218 */
4219 static int
4220 zfcp_fsf_send_fcp_command_task_management_handler(struct zfcp_fsf_req *fsf_req)
4221 {
4222 int retval = 0;
4223 struct fcp_rsp_iu *fcp_rsp_iu = (struct fcp_rsp_iu *)
4224 &(fsf_req->qtcb->bottom.io.fcp_rsp);
4225 char *fcp_rsp_info = zfcp_get_fcp_rsp_info_ptr(fcp_rsp_iu);
4226 struct zfcp_unit *unit = (struct zfcp_unit *) fsf_req->data;
4227
4228 del_timer(&fsf_req->adapter->scsi_er_timer);
4229 if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR) {
4230 fsf_req->status |= ZFCP_STATUS_FSFREQ_TMFUNCFAILED;
4231 goto skip_fsfstatus;
4232 }
4233
4234 /* check FCP_RSP_INFO */
4235 switch (fcp_rsp_info[3]) {
4236 case RSP_CODE_GOOD:
4237 /* ok, continue */
4238 ZFCP_LOG_DEBUG("no failure or Task Management "
4239 "Function complete\n");
4240 break;
4241 case RSP_CODE_TASKMAN_UNSUPP:
4242 ZFCP_LOG_NORMAL("bug: A reuested task management function "
4243 "is not supported on the target device "
4244 "unit 0x%016Lx, port 0x%016Lx, adapter %s\n ",
4245 unit->fcp_lun,
4246 unit->port->wwpn,
4247 zfcp_get_busid_by_unit(unit));
4248 fsf_req->status |= ZFCP_STATUS_FSFREQ_TMFUNCNOTSUPP;
4249 break;
4250 case RSP_CODE_TASKMAN_FAILED:
4251 ZFCP_LOG_NORMAL("bug: A reuested task management function "
4252 "failed to complete successfully. "
4253 "unit 0x%016Lx, port 0x%016Lx, adapter %s.\n",
4254 unit->fcp_lun,
4255 unit->port->wwpn,
4256 zfcp_get_busid_by_unit(unit));
4257 fsf_req->status |= ZFCP_STATUS_FSFREQ_TMFUNCFAILED;
4258 break;
4259 default:
4260 ZFCP_LOG_NORMAL("bug: An invalid FCP response "
4261 "code was detected for a command. "
4262 "unit 0x%016Lx, port 0x%016Lx, adapter %s "
4263 "(debug info 0x%x)\n",
4264 unit->fcp_lun,
4265 unit->port->wwpn,
4266 zfcp_get_busid_by_unit(unit),
4267 fcp_rsp_info[3]);
4268 fsf_req->status |= ZFCP_STATUS_FSFREQ_TMFUNCFAILED;
4269 }
4270
4271 skip_fsfstatus:
4272 return retval;
4273 }
4274
4275
4276 /*
4277 * function: zfcp_fsf_control_file
4278 *
4279 * purpose: Initiator of the control file upload/download FSF requests
4280 *
4281 * returns: 0 - FSF request is successfuly created and queued
4282 * -EOPNOTSUPP - The FCP adapter does not have Control File support
4283 * -EINVAL - Invalid direction specified
4284 * -ENOMEM - Insufficient memory
4285 * -EPERM - Cannot create FSF request or place it in QDIO queue
4286 */
4287 int
4288 zfcp_fsf_control_file(struct zfcp_adapter *adapter,
4289 struct zfcp_fsf_req **fsf_req_ptr,
4290 u32 fsf_command,
4291 u32 option,
4292 struct zfcp_sg_list *sg_list)
4293 {
4294 struct zfcp_fsf_req *fsf_req;
4295 struct fsf_qtcb_bottom_support *bottom;
4296 volatile struct qdio_buffer_element *sbale;
4297 struct timer_list *timer;
4298 unsigned long lock_flags;
4299 int req_flags = 0;
4300 int direction;
4301 int retval = 0;
4302
4303 if (!(adapter->adapter_features & FSF_FEATURE_CFDC)) {
4304 ZFCP_LOG_INFO("cfdc not supported (adapter %s)\n",
4305 zfcp_get_busid_by_adapter(adapter));
4306 retval = -EOPNOTSUPP;
4307 goto out;
4308 }
4309
4310 switch (fsf_command) {
4311
4312 case FSF_QTCB_DOWNLOAD_CONTROL_FILE:
4313 direction = SBAL_FLAGS0_TYPE_WRITE;
4314 if ((option != FSF_CFDC_OPTION_FULL_ACCESS) &&
4315 (option != FSF_CFDC_OPTION_RESTRICTED_ACCESS))
4316 req_flags = ZFCP_WAIT_FOR_SBAL;
4317 break;
4318
4319 case FSF_QTCB_UPLOAD_CONTROL_FILE:
4320 direction = SBAL_FLAGS0_TYPE_READ;
4321 break;
4322
4323 default:
4324 ZFCP_LOG_INFO("Invalid FSF command code 0x%08x\n", fsf_command);
4325 retval = -EINVAL;
4326 goto out;
4327 }
4328
4329 timer = kmalloc(sizeof(struct timer_list), GFP_KERNEL);
4330 if (!timer) {
4331 retval = -ENOMEM;
4332 goto out;
4333 }
4334
4335 retval = zfcp_fsf_req_create(adapter, fsf_command, req_flags,
4336 NULL, &lock_flags, &fsf_req);
4337 if (retval < 0) {
4338 ZFCP_LOG_INFO("error: Could not create FSF request for the "
4339 "adapter %s\n",
4340 zfcp_get_busid_by_adapter(adapter));
4341 retval = -EPERM;
4342 goto unlock_queue_lock;
4343 }
4344
4345 sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
4346 sbale[0].flags |= direction;
4347
4348 bottom = &fsf_req->qtcb->bottom.support;
4349 bottom->operation_subtype = FSF_CFDC_OPERATION_SUBTYPE;
4350 bottom->option = option;
4351
4352 if (sg_list->count > 0) {
4353 int bytes;
4354
4355 bytes = zfcp_qdio_sbals_from_sg(fsf_req, direction,
4356 sg_list->sg, sg_list->count,
4357 ZFCP_MAX_SBALS_PER_REQ);
4358 if (bytes != ZFCP_CFDC_MAX_CONTROL_FILE_SIZE) {
4359 ZFCP_LOG_INFO(
4360 "error: Could not create sufficient number of "
4361 "SBALS for an FSF request to the adapter %s\n",
4362 zfcp_get_busid_by_adapter(adapter));
4363 retval = -ENOMEM;
4364 goto free_fsf_req;
4365 }
4366 } else
4367 sbale[1].flags |= SBAL_FLAGS_LAST_ENTRY;
4368
4369 init_timer(timer);
4370 timer->function = zfcp_fsf_request_timeout_handler;
4371 timer->data = (unsigned long) adapter;
4372 timer->expires = ZFCP_FSF_REQUEST_TIMEOUT;
4373
4374 retval = zfcp_fsf_req_send(fsf_req, timer);
4375 if (retval < 0) {
4376 ZFCP_LOG_INFO("initiation of cfdc up/download failed"
4377 "(adapter %s)\n",
4378 zfcp_get_busid_by_adapter(adapter));
4379 retval = -EPERM;
4380 goto free_fsf_req;
4381 }
4382 write_unlock_irqrestore(&adapter->request_queue.queue_lock, lock_flags);
4383
4384 ZFCP_LOG_NORMAL("Control file %s FSF request has been sent to the "
4385 "adapter %s\n",
4386 fsf_command == FSF_QTCB_DOWNLOAD_CONTROL_FILE ?
4387 "download" : "upload",
4388 zfcp_get_busid_by_adapter(adapter));
4389
4390 wait_event(fsf_req->completion_wq,
4391 fsf_req->status & ZFCP_STATUS_FSFREQ_COMPLETED);
4392
4393 *fsf_req_ptr = fsf_req;
4394 del_timer_sync(timer);
4395 goto free_timer;
4396
4397 free_fsf_req:
4398 zfcp_fsf_req_free(fsf_req);
4399 unlock_queue_lock:
4400 write_unlock_irqrestore(&adapter->request_queue.queue_lock, lock_flags);
4401 free_timer:
4402 kfree(timer);
4403 out:
4404 return retval;
4405 }
4406
4407
4408 /*
4409 * function: zfcp_fsf_control_file_handler
4410 *
4411 * purpose: Handler of the control file upload/download FSF requests
4412 *
4413 * returns: 0 - FSF request successfuly processed
4414 * -EAGAIN - Operation has to be repeated because of a temporary problem
4415 * -EACCES - There is no permission to execute an operation
4416 * -EPERM - The control file is not in a right format
4417 * -EIO - There is a problem with the FCP adapter
4418 * -EINVAL - Invalid operation
4419 * -EFAULT - User space memory I/O operation fault
4420 */
4421 static int
4422 zfcp_fsf_control_file_handler(struct zfcp_fsf_req *fsf_req)
4423 {
4424 struct zfcp_adapter *adapter = fsf_req->adapter;
4425 struct fsf_qtcb_header *header = &fsf_req->qtcb->header;
4426 struct fsf_qtcb_bottom_support *bottom = &fsf_req->qtcb->bottom.support;
4427 int retval = 0;
4428
4429 if (fsf_req->status & ZFCP_STATUS_FSFREQ_ERROR) {
4430 retval = -EINVAL;
4431 goto skip_fsfstatus;
4432 }
4433
4434 switch (header->fsf_status) {
4435
4436 case FSF_GOOD:
4437 ZFCP_LOG_NORMAL(
4438 "The FSF request has been successfully completed "
4439 "on the adapter %s\n",
4440 zfcp_get_busid_by_adapter(adapter));
4441 break;
4442
4443 case FSF_OPERATION_PARTIALLY_SUCCESSFUL:
4444 if (bottom->operation_subtype == FSF_CFDC_OPERATION_SUBTYPE) {
4445 switch (header->fsf_status_qual.word[0]) {
4446
4447 case FSF_SQ_CFDC_HARDENED_ON_SE:
4448 ZFCP_LOG_NORMAL(
4449 "CFDC on the adapter %s has being "
4450 "hardened on primary and secondary SE\n",
4451 zfcp_get_busid_by_adapter(adapter));
4452 break;
4453
4454 case FSF_SQ_CFDC_COULD_NOT_HARDEN_ON_SE:
4455 ZFCP_LOG_NORMAL(
4456 "CFDC of the adapter %s could not "
4457 "be saved on the SE\n",
4458 zfcp_get_busid_by_adapter(adapter));
4459 break;
4460
4461 case FSF_SQ_CFDC_COULD_NOT_HARDEN_ON_SE2:
4462 ZFCP_LOG_NORMAL(
4463 "CFDC of the adapter %s could not "
4464 "be copied to the secondary SE\n",
4465 zfcp_get_busid_by_adapter(adapter));
4466 break;
4467
4468 default:
4469 ZFCP_LOG_NORMAL(
4470 "CFDC could not be hardened "
4471 "on the adapter %s\n",
4472 zfcp_get_busid_by_adapter(adapter));
4473 }
4474 }
4475 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4476 retval = -EAGAIN;
4477 break;
4478
4479 case FSF_AUTHORIZATION_FAILURE:
4480 ZFCP_LOG_NORMAL(
4481 "Adapter %s does not accept privileged commands\n",
4482 zfcp_get_busid_by_adapter(adapter));
4483 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4484 retval = -EACCES;
4485 break;
4486
4487 case FSF_CFDC_ERROR_DETECTED:
4488 ZFCP_LOG_NORMAL(
4489 "Error at position %d in the CFDC, "
4490 "CFDC is discarded by the adapter %s\n",
4491 header->fsf_status_qual.word[0],
4492 zfcp_get_busid_by_adapter(adapter));
4493 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4494 retval = -EPERM;
4495 break;
4496
4497 case FSF_CONTROL_FILE_UPDATE_ERROR:
4498 ZFCP_LOG_NORMAL(
4499 "Adapter %s cannot harden the control file, "
4500 "file is discarded\n",
4501 zfcp_get_busid_by_adapter(adapter));
4502 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4503 retval = -EIO;
4504 break;
4505
4506 case FSF_CONTROL_FILE_TOO_LARGE:
4507 ZFCP_LOG_NORMAL(
4508 "Control file is too large, file is discarded "
4509 "by the adapter %s\n",
4510 zfcp_get_busid_by_adapter(adapter));
4511 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4512 retval = -EIO;
4513 break;
4514
4515 case FSF_ACCESS_CONFLICT_DETECTED:
4516 if (bottom->operation_subtype == FSF_CFDC_OPERATION_SUBTYPE)
4517 ZFCP_LOG_NORMAL(
4518 "CFDC has been discarded by the adapter %s, "
4519 "because activation would impact "
4520 "%d active connection(s)\n",
4521 zfcp_get_busid_by_adapter(adapter),
4522 header->fsf_status_qual.word[0]);
4523 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4524 retval = -EIO;
4525 break;
4526
4527 case FSF_CONFLICTS_OVERRULED:
4528 if (bottom->operation_subtype == FSF_CFDC_OPERATION_SUBTYPE)
4529 ZFCP_LOG_NORMAL(
4530 "CFDC has been activated on the adapter %s, "
4531 "but activation has impacted "
4532 "%d active connection(s)\n",
4533 zfcp_get_busid_by_adapter(adapter),
4534 header->fsf_status_qual.word[0]);
4535 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4536 retval = -EIO;
4537 break;
4538
4539 case FSF_UNKNOWN_OP_SUBTYPE:
4540 ZFCP_LOG_NORMAL("unknown operation subtype (adapter: %s, "
4541 "op_subtype=0x%x)\n",
4542 zfcp_get_busid_by_adapter(adapter),
4543 bottom->operation_subtype);
4544 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4545 retval = -EINVAL;
4546 break;
4547
4548 case FSF_INVALID_COMMAND_OPTION:
4549 ZFCP_LOG_NORMAL(
4550 "Invalid option 0x%x has been specified "
4551 "in QTCB bottom sent to the adapter %s\n",
4552 bottom->option,
4553 zfcp_get_busid_by_adapter(adapter));
4554 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4555 retval = -EINVAL;
4556 break;
4557
4558 default:
4559 ZFCP_LOG_NORMAL(
4560 "bug: An unknown/unexpected FSF status 0x%08x "
4561 "was presented on the adapter %s\n",
4562 header->fsf_status,
4563 zfcp_get_busid_by_adapter(adapter));
4564 debug_text_event(fsf_req->adapter->erp_dbf, 0, "fsf_sq_inval");
4565 debug_exception(fsf_req->adapter->erp_dbf, 0,
4566 &header->fsf_status_qual.word[0], sizeof(u32));
4567 fsf_req->status |= ZFCP_STATUS_FSFREQ_ERROR;
4568 retval = -EINVAL;
4569 break;
4570 }
4571
4572 skip_fsfstatus:
4573 return retval;
4574 }
4575
4576 static inline int
4577 zfcp_fsf_req_sbal_check(unsigned long *flags,
4578 struct zfcp_qdio_queue *queue, int needed)
4579 {
4580 write_lock_irqsave(&queue->queue_lock, *flags);
4581 if (likely(atomic_read(&queue->free_count) >= needed))
4582 return 1;
4583 write_unlock_irqrestore(&queue->queue_lock, *flags);
4584 return 0;
4585 }
4586
4587 /*
4588 * set qtcb pointer in fsf_req and initialize QTCB
4589 */
4590 static inline void
4591 zfcp_fsf_req_qtcb_init(struct zfcp_fsf_req *fsf_req)
4592 {
4593 if (likely(fsf_req->qtcb != NULL)) {
4594 fsf_req->qtcb->prefix.req_seq_no = fsf_req->adapter->fsf_req_seq_no;
4595 fsf_req->qtcb->prefix.req_id = (unsigned long)fsf_req;
4596 fsf_req->qtcb->prefix.ulp_info = ZFCP_ULP_INFO_VERSION;
4597 fsf_req->qtcb->prefix.qtcb_type = fsf_qtcb_type[fsf_req->fsf_command];
4598 fsf_req->qtcb->prefix.qtcb_version = ZFCP_QTCB_VERSION;
4599 fsf_req->qtcb->header.req_handle = (unsigned long)fsf_req;
4600 fsf_req->qtcb->header.fsf_command = fsf_req->fsf_command;
4601 }
4602 }
4603
4604 /**
4605 * zfcp_fsf_req_sbal_get - try to get one SBAL in the request queue
4606 * @adapter: adapter for which request queue is examined
4607 * @req_flags: flags indicating whether to wait for needed SBAL or not
4608 * @lock_flags: lock_flags if queue_lock is taken
4609 * Return: 0 on success, otherwise -EIO, or -ERESTARTSYS
4610 * Locks: lock adapter->request_queue->queue_lock on success
4611 */
4612 static int
4613 zfcp_fsf_req_sbal_get(struct zfcp_adapter *adapter, int req_flags,
4614 unsigned long *lock_flags)
4615 {
4616 long ret;
4617 struct zfcp_qdio_queue *req_queue = &adapter->request_queue;
4618
4619 if (unlikely(req_flags & ZFCP_WAIT_FOR_SBAL)) {
4620 ret = wait_event_interruptible_timeout(adapter->request_wq,
4621 zfcp_fsf_req_sbal_check(lock_flags, req_queue, 1),
4622 ZFCP_SBAL_TIMEOUT);
4623 if (ret < 0)
4624 return ret;
4625 if (!ret)
4626 return -EIO;
4627 } else if (!zfcp_fsf_req_sbal_check(lock_flags, req_queue, 1))
4628 return -EIO;
4629
4630 return 0;
4631 }
4632
4633 /*
4634 * function: zfcp_fsf_req_create
4635 *
4636 * purpose: create an FSF request at the specified adapter and
4637 * setup common fields
4638 *
4639 * returns: -ENOMEM if there was insufficient memory for a request
4640 * -EIO if no qdio buffers could be allocate to the request
4641 * -EINVAL/-EPERM on bug conditions in req_dequeue
4642 * 0 in success
4643 *
4644 * note: The created request is returned by reference.
4645 *
4646 * locks: lock of concerned request queue must not be held,
4647 * but is held on completion (write, irqsave)
4648 */
4649 int
4650 zfcp_fsf_req_create(struct zfcp_adapter *adapter, u32 fsf_cmd, int req_flags,
4651 mempool_t *pool, unsigned long *lock_flags,
4652 struct zfcp_fsf_req **fsf_req_p)
4653 {
4654 volatile struct qdio_buffer_element *sbale;
4655 struct zfcp_fsf_req *fsf_req = NULL;
4656 int ret = 0;
4657 struct zfcp_qdio_queue *req_queue = &adapter->request_queue;
4658
4659 /* allocate new FSF request */
4660 fsf_req = zfcp_fsf_req_alloc(pool, req_flags);
4661 if (unlikely(NULL == fsf_req)) {
4662 ZFCP_LOG_DEBUG("error: Could not put an FSF request into"
4663 "the outbound (send) queue.\n");
4664 ret = -ENOMEM;
4665 goto failed_fsf_req;
4666 }
4667
4668 fsf_req->adapter = adapter;
4669 fsf_req->fsf_command = fsf_cmd;
4670
4671 zfcp_fsf_req_qtcb_init(fsf_req);
4672
4673 /* initialize waitqueue which may be used to wait on
4674 this request completion */
4675 init_waitqueue_head(&fsf_req->completion_wq);
4676
4677 ret = zfcp_fsf_req_sbal_get(adapter, req_flags, lock_flags);
4678 if(ret < 0) {
4679 goto failed_sbals;
4680 }
4681
4682 /*
4683 * We hold queue_lock here. Check if QDIOUP is set and let request fail
4684 * if it is not set (see also *_open_qdio and *_close_qdio).
4685 */
4686
4687 if (!atomic_test_mask(ZFCP_STATUS_ADAPTER_QDIOUP, &adapter->status)) {
4688 write_unlock_irqrestore(&req_queue->queue_lock, *lock_flags);
4689 ret = -EIO;
4690 goto failed_sbals;
4691 }
4692
4693 if (fsf_req->qtcb) {
4694 fsf_req->seq_no = adapter->fsf_req_seq_no;
4695 fsf_req->qtcb->prefix.req_seq_no = adapter->fsf_req_seq_no;
4696 }
4697 fsf_req->sbal_number = 1;
4698 fsf_req->sbal_first = req_queue->free_index;
4699 fsf_req->sbal_curr = req_queue->free_index;
4700 fsf_req->sbale_curr = 1;
4701
4702 if (likely(req_flags & ZFCP_REQ_AUTO_CLEANUP)) {
4703 fsf_req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
4704 }
4705
4706 sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_curr, 0);
4707
4708 /* setup common SBALE fields */
4709 sbale[0].addr = fsf_req;
4710 sbale[0].flags |= SBAL_FLAGS0_COMMAND;
4711 if (likely(fsf_req->qtcb != NULL)) {
4712 sbale[1].addr = (void *) fsf_req->qtcb;
4713 sbale[1].length = sizeof(struct fsf_qtcb);
4714 }
4715
4716 ZFCP_LOG_TRACE("got %i free BUFFERs starting at index %i\n",
4717 fsf_req->sbal_number, fsf_req->sbal_first);
4718
4719 goto success;
4720
4721 failed_sbals:
4722 /* dequeue new FSF request previously enqueued */
4723 zfcp_fsf_req_free(fsf_req);
4724 fsf_req = NULL;
4725
4726 failed_fsf_req:
4727 write_lock_irqsave(&req_queue->queue_lock, *lock_flags);
4728 success:
4729 *fsf_req_p = fsf_req;
4730 return ret;
4731 }
4732
4733 /*
4734 * function: zfcp_fsf_req_send
4735 *
4736 * purpose: start transfer of FSF request via QDIO
4737 *
4738 * returns: 0 - request transfer succesfully started
4739 * !0 - start of request transfer failed
4740 */
4741 static int
4742 zfcp_fsf_req_send(struct zfcp_fsf_req *fsf_req, struct timer_list *timer)
4743 {
4744 struct zfcp_adapter *adapter;
4745 struct zfcp_qdio_queue *req_queue;
4746 volatile struct qdio_buffer_element *sbale;
4747 int inc_seq_no;
4748 int new_distance_from_int;
4749 unsigned long flags;
4750 int retval = 0;
4751
4752 adapter = fsf_req->adapter;
4753 req_queue = &adapter->request_queue,
4754
4755
4756 /* FIXME(debug): remove it later */
4757 sbale = zfcp_qdio_sbale_req(fsf_req, fsf_req->sbal_first, 0);
4758 ZFCP_LOG_DEBUG("SBALE0 flags=0x%x\n", sbale[0].flags);
4759 ZFCP_LOG_TRACE("HEX DUMP OF SBALE1 PAYLOAD:\n");
4760 ZFCP_HEX_DUMP(ZFCP_LOG_LEVEL_TRACE, (char *) sbale[1].addr,
4761 sbale[1].length);
4762
4763 /* put allocated FSF request at list tail */
4764 spin_lock_irqsave(&adapter->fsf_req_list_lock, flags);
4765 list_add_tail(&fsf_req->list, &adapter->fsf_req_list_head);
4766 spin_unlock_irqrestore(&adapter->fsf_req_list_lock, flags);
4767
4768 inc_seq_no = (fsf_req->qtcb != NULL);
4769
4770 /* figure out expiration time of timeout and start timeout */
4771 if (unlikely(timer)) {
4772 timer->expires += jiffies;
4773 add_timer(timer);
4774 }
4775
4776 ZFCP_LOG_TRACE("request queue of adapter %s: "
4777 "next free SBAL is %i, %i free SBALs\n",
4778 zfcp_get_busid_by_adapter(adapter),
4779 req_queue->free_index,
4780 atomic_read(&req_queue->free_count));
4781
4782 ZFCP_LOG_DEBUG("calling do_QDIO adapter %s, flags=0x%x, queue_no=%i, "
4783 "index_in_queue=%i, count=%i, buffers=%p\n",
4784 zfcp_get_busid_by_adapter(adapter),
4785 QDIO_FLAG_SYNC_OUTPUT,
4786 0, fsf_req->sbal_first, fsf_req->sbal_number,
4787 &req_queue->buffer[fsf_req->sbal_first]);
4788
4789 /*
4790 * adjust the number of free SBALs in request queue as well as
4791 * position of first one
4792 */
4793 atomic_sub(fsf_req->sbal_number, &req_queue->free_count);
4794 ZFCP_LOG_TRACE("free_count=%d\n", atomic_read(&req_queue->free_count));
4795 req_queue->free_index += fsf_req->sbal_number; /* increase */
4796 req_queue->free_index %= QDIO_MAX_BUFFERS_PER_Q; /* wrap if needed */
4797 new_distance_from_int = zfcp_qdio_determine_pci(req_queue, fsf_req);
4798
4799 fsf_req->issued = get_clock();
4800
4801 retval = do_QDIO(adapter->ccw_device,
4802 QDIO_FLAG_SYNC_OUTPUT,
4803 0, fsf_req->sbal_first, fsf_req->sbal_number, NULL);
4804
4805 if (unlikely(retval)) {
4806 /* Queues are down..... */
4807 retval = -EIO;
4808 /*
4809 * FIXME(potential race):
4810 * timer might be expired (absolutely unlikely)
4811 */
4812 if (timer)
4813 del_timer(timer);
4814 spin_lock_irqsave(&adapter->fsf_req_list_lock, flags);
4815 list_del(&fsf_req->list);
4816 spin_unlock_irqrestore(&adapter->fsf_req_list_lock, flags);
4817 /*
4818 * adjust the number of free SBALs in request queue as well as
4819 * position of first one
4820 */
4821 zfcp_qdio_zero_sbals(req_queue->buffer,
4822 fsf_req->sbal_first, fsf_req->sbal_number);
4823 atomic_add(fsf_req->sbal_number, &req_queue->free_count);
4824 req_queue->free_index -= fsf_req->sbal_number; /* increase */
4825 req_queue->free_index += QDIO_MAX_BUFFERS_PER_Q;
4826 req_queue->free_index %= QDIO_MAX_BUFFERS_PER_Q; /* wrap */
4827 ZFCP_LOG_DEBUG
4828 ("error: do_QDIO failed. Buffers could not be enqueued "
4829 "to request queue.\n");
4830 } else {
4831 req_queue->distance_from_int = new_distance_from_int;
4832 /*
4833 * increase FSF sequence counter -
4834 * this must only be done for request successfully enqueued to
4835 * QDIO this rejected requests may be cleaned up by calling
4836 * routines resulting in missing sequence counter values
4837 * otherwise,
4838 */
4839
4840 /* Don't increase for unsolicited status */
4841 if (inc_seq_no)
4842 adapter->fsf_req_seq_no++;
4843
4844 /* count FSF requests pending */
4845 atomic_inc(&adapter->fsf_reqs_active);
4846 }
4847 return retval;
4848 }
4849
4850 #undef ZFCP_LOG_AREA
Community contributions to the Openmoko Kernel