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