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