zfcp: fix adapter (re)open recovery while link to SAN is down
[pandora-kernel.git] / drivers / s390 / scsi / zfcp_fsf.c
1 /*
2  * zfcp device driver
3  *
4  * Implementation of FSF commands.
5  *
6  * Copyright IBM Corporation 2002, 2010
7  */
8
9 #define KMSG_COMPONENT "zfcp"
10 #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
11
12 #include <linux/blktrace_api.h>
13 #include <linux/slab.h>
14 #include <scsi/fc/fc_els.h>
15 #include "zfcp_ext.h"
16 #include "zfcp_fc.h"
17 #include "zfcp_dbf.h"
18 #include "zfcp_qdio.h"
19 #include "zfcp_reqlist.h"
20
21 struct kmem_cache *zfcp_fsf_qtcb_cache;
22
23 static void zfcp_fsf_request_timeout_handler(unsigned long data)
24 {
25         struct zfcp_adapter *adapter = (struct zfcp_adapter *) data;
26         zfcp_qdio_siosl(adapter);
27         zfcp_erp_adapter_reopen(adapter, ZFCP_STATUS_COMMON_ERP_FAILED,
28                                 "fsrth_1");
29 }
30
31 static void zfcp_fsf_start_timer(struct zfcp_fsf_req *fsf_req,
32                                  unsigned long timeout)
33 {
34         fsf_req->timer.function = zfcp_fsf_request_timeout_handler;
35         fsf_req->timer.data = (unsigned long) fsf_req->adapter;
36         fsf_req->timer.expires = jiffies + timeout;
37         add_timer(&fsf_req->timer);
38 }
39
40 static void zfcp_fsf_start_erp_timer(struct zfcp_fsf_req *fsf_req)
41 {
42         BUG_ON(!fsf_req->erp_action);
43         fsf_req->timer.function = zfcp_erp_timeout_handler;
44         fsf_req->timer.data = (unsigned long) fsf_req->erp_action;
45         fsf_req->timer.expires = jiffies + 30 * HZ;
46         add_timer(&fsf_req->timer);
47 }
48
49 /* association between FSF command and FSF QTCB type */
50 static u32 fsf_qtcb_type[] = {
51         [FSF_QTCB_FCP_CMND] =             FSF_IO_COMMAND,
52         [FSF_QTCB_ABORT_FCP_CMND] =       FSF_SUPPORT_COMMAND,
53         [FSF_QTCB_OPEN_PORT_WITH_DID] =   FSF_SUPPORT_COMMAND,
54         [FSF_QTCB_OPEN_LUN] =             FSF_SUPPORT_COMMAND,
55         [FSF_QTCB_CLOSE_LUN] =            FSF_SUPPORT_COMMAND,
56         [FSF_QTCB_CLOSE_PORT] =           FSF_SUPPORT_COMMAND,
57         [FSF_QTCB_CLOSE_PHYSICAL_PORT] =  FSF_SUPPORT_COMMAND,
58         [FSF_QTCB_SEND_ELS] =             FSF_SUPPORT_COMMAND,
59         [FSF_QTCB_SEND_GENERIC] =         FSF_SUPPORT_COMMAND,
60         [FSF_QTCB_EXCHANGE_CONFIG_DATA] = FSF_CONFIG_COMMAND,
61         [FSF_QTCB_EXCHANGE_PORT_DATA] =   FSF_PORT_COMMAND,
62         [FSF_QTCB_DOWNLOAD_CONTROL_FILE] = FSF_SUPPORT_COMMAND,
63         [FSF_QTCB_UPLOAD_CONTROL_FILE] =  FSF_SUPPORT_COMMAND
64 };
65
66 static void zfcp_fsf_class_not_supp(struct zfcp_fsf_req *req)
67 {
68         dev_err(&req->adapter->ccw_device->dev, "FCP device not "
69                 "operational because of an unsupported FC class\n");
70         zfcp_erp_adapter_shutdown(req->adapter, 0, "fscns_1");
71         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
72 }
73
74 /**
75  * zfcp_fsf_req_free - free memory used by fsf request
76  * @fsf_req: pointer to struct zfcp_fsf_req
77  */
78 void zfcp_fsf_req_free(struct zfcp_fsf_req *req)
79 {
80         if (likely(req->pool)) {
81                 if (likely(req->qtcb))
82                         mempool_free(req->qtcb, req->adapter->pool.qtcb_pool);
83                 mempool_free(req, req->pool);
84                 return;
85         }
86
87         if (likely(req->qtcb))
88                 kmem_cache_free(zfcp_fsf_qtcb_cache, req->qtcb);
89         kfree(req);
90 }
91
92 static void zfcp_fsf_status_read_port_closed(struct zfcp_fsf_req *req)
93 {
94         unsigned long flags;
95         struct fsf_status_read_buffer *sr_buf = req->data;
96         struct zfcp_adapter *adapter = req->adapter;
97         struct zfcp_port *port;
98         int d_id = ntoh24(sr_buf->d_id);
99
100         read_lock_irqsave(&adapter->port_list_lock, flags);
101         list_for_each_entry(port, &adapter->port_list, list)
102                 if (port->d_id == d_id) {
103                         zfcp_erp_port_reopen(port, 0, "fssrpc1");
104                         break;
105                 }
106         read_unlock_irqrestore(&adapter->port_list_lock, flags);
107 }
108
109 static void zfcp_fsf_link_down_info_eval(struct zfcp_fsf_req *req,
110                                          struct fsf_link_down_info *link_down)
111 {
112         struct zfcp_adapter *adapter = req->adapter;
113
114         if (atomic_read(&adapter->status) & ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED)
115                 return;
116
117         atomic_set_mask(ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED, &adapter->status);
118
119         zfcp_scsi_schedule_rports_block(adapter);
120
121         if (!link_down)
122                 goto out;
123
124         switch (link_down->error_code) {
125         case FSF_PSQ_LINK_NO_LIGHT:
126                 dev_warn(&req->adapter->ccw_device->dev,
127                          "There is no light signal from the local "
128                          "fibre channel cable\n");
129                 break;
130         case FSF_PSQ_LINK_WRAP_PLUG:
131                 dev_warn(&req->adapter->ccw_device->dev,
132                          "There is a wrap plug instead of a fibre "
133                          "channel cable\n");
134                 break;
135         case FSF_PSQ_LINK_NO_FCP:
136                 dev_warn(&req->adapter->ccw_device->dev,
137                          "The adjacent fibre channel node does not "
138                          "support FCP\n");
139                 break;
140         case FSF_PSQ_LINK_FIRMWARE_UPDATE:
141                 dev_warn(&req->adapter->ccw_device->dev,
142                          "The FCP device is suspended because of a "
143                          "firmware update\n");
144                 break;
145         case FSF_PSQ_LINK_INVALID_WWPN:
146                 dev_warn(&req->adapter->ccw_device->dev,
147                          "The FCP device detected a WWPN that is "
148                          "duplicate or not valid\n");
149                 break;
150         case FSF_PSQ_LINK_NO_NPIV_SUPPORT:
151                 dev_warn(&req->adapter->ccw_device->dev,
152                          "The fibre channel fabric does not support NPIV\n");
153                 break;
154         case FSF_PSQ_LINK_NO_FCP_RESOURCES:
155                 dev_warn(&req->adapter->ccw_device->dev,
156                          "The FCP adapter cannot support more NPIV ports\n");
157                 break;
158         case FSF_PSQ_LINK_NO_FABRIC_RESOURCES:
159                 dev_warn(&req->adapter->ccw_device->dev,
160                          "The adjacent switch cannot support "
161                          "more NPIV ports\n");
162                 break;
163         case FSF_PSQ_LINK_FABRIC_LOGIN_UNABLE:
164                 dev_warn(&req->adapter->ccw_device->dev,
165                          "The FCP adapter could not log in to the "
166                          "fibre channel fabric\n");
167                 break;
168         case FSF_PSQ_LINK_WWPN_ASSIGNMENT_CORRUPTED:
169                 dev_warn(&req->adapter->ccw_device->dev,
170                          "The WWPN assignment file on the FCP adapter "
171                          "has been damaged\n");
172                 break;
173         case FSF_PSQ_LINK_MODE_TABLE_CURRUPTED:
174                 dev_warn(&req->adapter->ccw_device->dev,
175                          "The mode table on the FCP adapter "
176                          "has been damaged\n");
177                 break;
178         case FSF_PSQ_LINK_NO_WWPN_ASSIGNMENT:
179                 dev_warn(&req->adapter->ccw_device->dev,
180                          "All NPIV ports on the FCP adapter have "
181                          "been assigned\n");
182                 break;
183         default:
184                 dev_warn(&req->adapter->ccw_device->dev,
185                          "The link between the FCP adapter and "
186                          "the FC fabric is down\n");
187         }
188 out:
189         zfcp_erp_set_adapter_status(adapter, ZFCP_STATUS_COMMON_ERP_FAILED);
190 }
191
192 static void zfcp_fsf_status_read_link_down(struct zfcp_fsf_req *req)
193 {
194         struct fsf_status_read_buffer *sr_buf = req->data;
195         struct fsf_link_down_info *ldi =
196                 (struct fsf_link_down_info *) &sr_buf->payload;
197
198         switch (sr_buf->status_subtype) {
199         case FSF_STATUS_READ_SUB_NO_PHYSICAL_LINK:
200                 zfcp_fsf_link_down_info_eval(req, ldi);
201                 break;
202         case FSF_STATUS_READ_SUB_FDISC_FAILED:
203                 zfcp_fsf_link_down_info_eval(req, ldi);
204                 break;
205         case FSF_STATUS_READ_SUB_FIRMWARE_UPDATE:
206                 zfcp_fsf_link_down_info_eval(req, NULL);
207         };
208 }
209
210 static void zfcp_fsf_status_read_handler(struct zfcp_fsf_req *req)
211 {
212         struct zfcp_adapter *adapter = req->adapter;
213         struct fsf_status_read_buffer *sr_buf = req->data;
214
215         if (req->status & ZFCP_STATUS_FSFREQ_DISMISSED) {
216                 zfcp_dbf_hba_fsf_uss("fssrh_1", req);
217                 mempool_free(virt_to_page(sr_buf), adapter->pool.sr_data);
218                 zfcp_fsf_req_free(req);
219                 return;
220         }
221
222         zfcp_dbf_hba_fsf_uss("fssrh_4", req);
223
224         switch (sr_buf->status_type) {
225         case FSF_STATUS_READ_PORT_CLOSED:
226                 zfcp_fsf_status_read_port_closed(req);
227                 break;
228         case FSF_STATUS_READ_INCOMING_ELS:
229                 zfcp_fc_incoming_els(req);
230                 break;
231         case FSF_STATUS_READ_SENSE_DATA_AVAIL:
232                 break;
233         case FSF_STATUS_READ_BIT_ERROR_THRESHOLD:
234                 dev_warn(&adapter->ccw_device->dev,
235                          "The error threshold for checksum statistics "
236                          "has been exceeded\n");
237                 zfcp_dbf_hba_bit_err("fssrh_3", req);
238                 break;
239         case FSF_STATUS_READ_LINK_DOWN:
240                 zfcp_fsf_status_read_link_down(req);
241                 zfcp_fc_enqueue_event(adapter, FCH_EVT_LINKDOWN, 0);
242                 break;
243         case FSF_STATUS_READ_LINK_UP:
244                 dev_info(&adapter->ccw_device->dev,
245                          "The local link has been restored\n");
246                 /* All ports should be marked as ready to run again */
247                 zfcp_erp_set_adapter_status(adapter,
248                                             ZFCP_STATUS_COMMON_RUNNING);
249                 zfcp_erp_adapter_reopen(adapter,
250                                         ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED |
251                                         ZFCP_STATUS_COMMON_ERP_FAILED,
252                                         "fssrh_2");
253                 zfcp_fc_enqueue_event(adapter, FCH_EVT_LINKUP, 0);
254
255                 break;
256         case FSF_STATUS_READ_NOTIFICATION_LOST:
257                 if (sr_buf->status_subtype & FSF_STATUS_READ_SUB_ACT_UPDATED)
258                         zfcp_cfdc_adapter_access_changed(adapter);
259                 if (sr_buf->status_subtype & FSF_STATUS_READ_SUB_INCOMING_ELS)
260                         queue_work(adapter->work_queue, &adapter->scan_work);
261                 break;
262         case FSF_STATUS_READ_CFDC_UPDATED:
263                 zfcp_cfdc_adapter_access_changed(adapter);
264                 break;
265         case FSF_STATUS_READ_FEATURE_UPDATE_ALERT:
266                 adapter->adapter_features = sr_buf->payload.word[0];
267                 break;
268         }
269
270         mempool_free(virt_to_page(sr_buf), adapter->pool.sr_data);
271         zfcp_fsf_req_free(req);
272
273         atomic_inc(&adapter->stat_miss);
274         queue_work(adapter->work_queue, &adapter->stat_work);
275 }
276
277 static void zfcp_fsf_fsfstatus_qual_eval(struct zfcp_fsf_req *req)
278 {
279         switch (req->qtcb->header.fsf_status_qual.word[0]) {
280         case FSF_SQ_FCP_RSP_AVAILABLE:
281         case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
282         case FSF_SQ_NO_RETRY_POSSIBLE:
283         case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
284                 return;
285         case FSF_SQ_COMMAND_ABORTED:
286                 break;
287         case FSF_SQ_NO_RECOM:
288                 dev_err(&req->adapter->ccw_device->dev,
289                         "The FCP adapter reported a problem "
290                         "that cannot be recovered\n");
291                 zfcp_qdio_siosl(req->adapter);
292                 zfcp_erp_adapter_shutdown(req->adapter, 0, "fsfsqe1");
293                 break;
294         }
295         /* all non-return stats set FSFREQ_ERROR*/
296         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
297 }
298
299 static void zfcp_fsf_fsfstatus_eval(struct zfcp_fsf_req *req)
300 {
301         if (unlikely(req->status & ZFCP_STATUS_FSFREQ_ERROR))
302                 return;
303
304         switch (req->qtcb->header.fsf_status) {
305         case FSF_UNKNOWN_COMMAND:
306                 dev_err(&req->adapter->ccw_device->dev,
307                         "The FCP adapter does not recognize the command 0x%x\n",
308                         req->qtcb->header.fsf_command);
309                 zfcp_erp_adapter_shutdown(req->adapter, 0, "fsfse_1");
310                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
311                 break;
312         case FSF_ADAPTER_STATUS_AVAILABLE:
313                 zfcp_fsf_fsfstatus_qual_eval(req);
314                 break;
315         }
316 }
317
318 static void zfcp_fsf_protstatus_eval(struct zfcp_fsf_req *req)
319 {
320         struct zfcp_adapter *adapter = req->adapter;
321         struct fsf_qtcb *qtcb = req->qtcb;
322         union fsf_prot_status_qual *psq = &qtcb->prefix.prot_status_qual;
323
324         zfcp_dbf_hba_fsf_response(req);
325
326         if (req->status & ZFCP_STATUS_FSFREQ_DISMISSED) {
327                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
328                 return;
329         }
330
331         switch (qtcb->prefix.prot_status) {
332         case FSF_PROT_GOOD:
333         case FSF_PROT_FSF_STATUS_PRESENTED:
334                 return;
335         case FSF_PROT_QTCB_VERSION_ERROR:
336                 dev_err(&adapter->ccw_device->dev,
337                         "QTCB version 0x%x not supported by FCP adapter "
338                         "(0x%x to 0x%x)\n", FSF_QTCB_CURRENT_VERSION,
339                         psq->word[0], psq->word[1]);
340                 zfcp_erp_adapter_shutdown(adapter, 0, "fspse_1");
341                 break;
342         case FSF_PROT_ERROR_STATE:
343         case FSF_PROT_SEQ_NUMB_ERROR:
344                 zfcp_erp_adapter_reopen(adapter, 0, "fspse_2");
345                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
346                 break;
347         case FSF_PROT_UNSUPP_QTCB_TYPE:
348                 dev_err(&adapter->ccw_device->dev,
349                         "The QTCB type is not supported by the FCP adapter\n");
350                 zfcp_erp_adapter_shutdown(adapter, 0, "fspse_3");
351                 break;
352         case FSF_PROT_HOST_CONNECTION_INITIALIZING:
353                 atomic_set_mask(ZFCP_STATUS_ADAPTER_HOST_CON_INIT,
354                                 &adapter->status);
355                 break;
356         case FSF_PROT_DUPLICATE_REQUEST_ID:
357                 dev_err(&adapter->ccw_device->dev,
358                         "0x%Lx is an ambiguous request identifier\n",
359                         (unsigned long long)qtcb->bottom.support.req_handle);
360                 zfcp_erp_adapter_shutdown(adapter, 0, "fspse_4");
361                 break;
362         case FSF_PROT_LINK_DOWN:
363                 zfcp_fsf_link_down_info_eval(req, &psq->link_down_info);
364                 /* go through reopen to flush pending requests */
365                 zfcp_erp_adapter_reopen(adapter, 0, "fspse_6");
366                 break;
367         case FSF_PROT_REEST_QUEUE:
368                 /* All ports should be marked as ready to run again */
369                 zfcp_erp_set_adapter_status(adapter,
370                                             ZFCP_STATUS_COMMON_RUNNING);
371                 zfcp_erp_adapter_reopen(adapter,
372                                         ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED |
373                                         ZFCP_STATUS_COMMON_ERP_FAILED,
374                                         "fspse_8");
375                 break;
376         default:
377                 dev_err(&adapter->ccw_device->dev,
378                         "0x%x is not a valid transfer protocol status\n",
379                         qtcb->prefix.prot_status);
380                 zfcp_qdio_siosl(adapter);
381                 zfcp_erp_adapter_shutdown(adapter, 0, "fspse_9");
382         }
383         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
384 }
385
386 /**
387  * zfcp_fsf_req_complete - process completion of a FSF request
388  * @fsf_req: The FSF request that has been completed.
389  *
390  * When a request has been completed either from the FCP adapter,
391  * or it has been dismissed due to a queue shutdown, this function
392  * is called to process the completion status and trigger further
393  * events related to the FSF request.
394  */
395 static void zfcp_fsf_req_complete(struct zfcp_fsf_req *req)
396 {
397         if (unlikely(req->fsf_command == FSF_QTCB_UNSOLICITED_STATUS)) {
398                 zfcp_fsf_status_read_handler(req);
399                 return;
400         }
401
402         del_timer(&req->timer);
403         zfcp_fsf_protstatus_eval(req);
404         zfcp_fsf_fsfstatus_eval(req);
405         req->handler(req);
406
407         if (req->erp_action)
408                 zfcp_erp_notify(req->erp_action, 0);
409
410         if (likely(req->status & ZFCP_STATUS_FSFREQ_CLEANUP))
411                 zfcp_fsf_req_free(req);
412         else
413                 complete(&req->completion);
414 }
415
416 /**
417  * zfcp_fsf_req_dismiss_all - dismiss all fsf requests
418  * @adapter: pointer to struct zfcp_adapter
419  *
420  * Never ever call this without shutting down the adapter first.
421  * Otherwise the adapter would continue using and corrupting s390 storage.
422  * Included BUG_ON() call to ensure this is done.
423  * ERP is supposed to be the only user of this function.
424  */
425 void zfcp_fsf_req_dismiss_all(struct zfcp_adapter *adapter)
426 {
427         struct zfcp_fsf_req *req, *tmp;
428         LIST_HEAD(remove_queue);
429
430         BUG_ON(atomic_read(&adapter->status) & ZFCP_STATUS_ADAPTER_QDIOUP);
431         zfcp_reqlist_move(adapter->req_list, &remove_queue);
432
433         list_for_each_entry_safe(req, tmp, &remove_queue, list) {
434                 list_del(&req->list);
435                 req->status |= ZFCP_STATUS_FSFREQ_DISMISSED;
436                 zfcp_fsf_req_complete(req);
437         }
438 }
439
440 static int zfcp_fsf_exchange_config_evaluate(struct zfcp_fsf_req *req)
441 {
442         struct fsf_qtcb_bottom_config *bottom = &req->qtcb->bottom.config;
443         struct zfcp_adapter *adapter = req->adapter;
444         struct Scsi_Host *shost = adapter->scsi_host;
445         struct fc_els_flogi *nsp, *plogi;
446
447         /* adjust pointers for missing command code */
448         nsp = (struct fc_els_flogi *) ((u8 *)&bottom->nport_serv_param
449                                         - sizeof(u32));
450         plogi = (struct fc_els_flogi *) ((u8 *)&bottom->plogi_payload
451                                         - sizeof(u32));
452
453         if (req->data)
454                 memcpy(req->data, bottom, sizeof(*bottom));
455
456         fc_host_port_name(shost) = nsp->fl_wwpn;
457         fc_host_node_name(shost) = nsp->fl_wwnn;
458         fc_host_port_id(shost) = ntoh24(bottom->s_id);
459         fc_host_speed(shost) = bottom->fc_link_speed;
460         fc_host_supported_classes(shost) = FC_COS_CLASS2 | FC_COS_CLASS3;
461
462         adapter->hydra_version = bottom->adapter_type;
463         adapter->timer_ticks = bottom->timer_interval & ZFCP_FSF_TIMER_INT_MASK;
464         adapter->stat_read_buf_num = max(bottom->status_read_buf_num,
465                                          (u16)FSF_STATUS_READS_RECOM);
466
467         if (fc_host_permanent_port_name(shost) == -1)
468                 fc_host_permanent_port_name(shost) = fc_host_port_name(shost);
469
470         switch (bottom->fc_topology) {
471         case FSF_TOPO_P2P:
472                 adapter->peer_d_id = ntoh24(bottom->peer_d_id);
473                 adapter->peer_wwpn = plogi->fl_wwpn;
474                 adapter->peer_wwnn = plogi->fl_wwnn;
475                 fc_host_port_type(shost) = FC_PORTTYPE_PTP;
476                 break;
477         case FSF_TOPO_FABRIC:
478                 fc_host_port_type(shost) = FC_PORTTYPE_NPORT;
479                 break;
480         case FSF_TOPO_AL:
481                 fc_host_port_type(shost) = FC_PORTTYPE_NLPORT;
482                 /* fall through */
483         default:
484                 dev_err(&adapter->ccw_device->dev,
485                         "Unknown or unsupported arbitrated loop "
486                         "fibre channel topology detected\n");
487                 zfcp_erp_adapter_shutdown(adapter, 0, "fsece_1");
488                 return -EIO;
489         }
490
491         zfcp_scsi_set_prot(adapter);
492
493         return 0;
494 }
495
496 static void zfcp_fsf_exchange_config_data_handler(struct zfcp_fsf_req *req)
497 {
498         struct zfcp_adapter *adapter = req->adapter;
499         struct fsf_qtcb *qtcb = req->qtcb;
500         struct fsf_qtcb_bottom_config *bottom = &qtcb->bottom.config;
501         struct Scsi_Host *shost = adapter->scsi_host;
502
503         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
504                 return;
505
506         adapter->fsf_lic_version = bottom->lic_version;
507         adapter->adapter_features = bottom->adapter_features;
508         adapter->connection_features = bottom->connection_features;
509         adapter->peer_wwpn = 0;
510         adapter->peer_wwnn = 0;
511         adapter->peer_d_id = 0;
512
513         switch (qtcb->header.fsf_status) {
514         case FSF_GOOD:
515                 if (zfcp_fsf_exchange_config_evaluate(req))
516                         return;
517
518                 if (bottom->max_qtcb_size < sizeof(struct fsf_qtcb)) {
519                         dev_err(&adapter->ccw_device->dev,
520                                 "FCP adapter maximum QTCB size (%d bytes) "
521                                 "is too small\n",
522                                 bottom->max_qtcb_size);
523                         zfcp_erp_adapter_shutdown(adapter, 0, "fsecdh1");
524                         return;
525                 }
526                 atomic_set_mask(ZFCP_STATUS_ADAPTER_XCONFIG_OK,
527                                 &adapter->status);
528                 break;
529         case FSF_EXCHANGE_CONFIG_DATA_INCOMPLETE:
530                 fc_host_node_name(shost) = 0;
531                 fc_host_port_name(shost) = 0;
532                 fc_host_port_id(shost) = 0;
533                 fc_host_speed(shost) = FC_PORTSPEED_UNKNOWN;
534                 fc_host_port_type(shost) = FC_PORTTYPE_UNKNOWN;
535                 adapter->hydra_version = 0;
536
537                 /* avoids adapter shutdown to be able to recognize
538                  * events such as LINK UP */
539                 atomic_set_mask(ZFCP_STATUS_ADAPTER_XCONFIG_OK,
540                                 &adapter->status);
541                 zfcp_fsf_link_down_info_eval(req,
542                         &qtcb->header.fsf_status_qual.link_down_info);
543                 break;
544         default:
545                 zfcp_erp_adapter_shutdown(adapter, 0, "fsecdh3");
546                 return;
547         }
548
549         if (adapter->adapter_features & FSF_FEATURE_HBAAPI_MANAGEMENT) {
550                 adapter->hardware_version = bottom->hardware_version;
551                 memcpy(fc_host_serial_number(shost), bottom->serial_number,
552                        min(FC_SERIAL_NUMBER_SIZE, 17));
553                 EBCASC(fc_host_serial_number(shost),
554                        min(FC_SERIAL_NUMBER_SIZE, 17));
555         }
556
557         if (FSF_QTCB_CURRENT_VERSION < bottom->low_qtcb_version) {
558                 dev_err(&adapter->ccw_device->dev,
559                         "The FCP adapter only supports newer "
560                         "control block versions\n");
561                 zfcp_erp_adapter_shutdown(adapter, 0, "fsecdh4");
562                 return;
563         }
564         if (FSF_QTCB_CURRENT_VERSION > bottom->high_qtcb_version) {
565                 dev_err(&adapter->ccw_device->dev,
566                         "The FCP adapter only supports older "
567                         "control block versions\n");
568                 zfcp_erp_adapter_shutdown(adapter, 0, "fsecdh5");
569         }
570 }
571
572 static void zfcp_fsf_exchange_port_evaluate(struct zfcp_fsf_req *req)
573 {
574         struct zfcp_adapter *adapter = req->adapter;
575         struct fsf_qtcb_bottom_port *bottom = &req->qtcb->bottom.port;
576         struct Scsi_Host *shost = adapter->scsi_host;
577
578         if (req->data)
579                 memcpy(req->data, bottom, sizeof(*bottom));
580
581         if (adapter->connection_features & FSF_FEATURE_NPIV_MODE) {
582                 fc_host_permanent_port_name(shost) = bottom->wwpn;
583                 fc_host_port_type(shost) = FC_PORTTYPE_NPIV;
584         } else
585                 fc_host_permanent_port_name(shost) = fc_host_port_name(shost);
586         fc_host_maxframe_size(shost) = bottom->maximum_frame_size;
587         fc_host_supported_speeds(shost) = bottom->supported_speed;
588         memcpy(fc_host_supported_fc4s(shost), bottom->supported_fc4_types,
589                FC_FC4_LIST_SIZE);
590         memcpy(fc_host_active_fc4s(shost), bottom->active_fc4_types,
591                FC_FC4_LIST_SIZE);
592 }
593
594 static void zfcp_fsf_exchange_port_data_handler(struct zfcp_fsf_req *req)
595 {
596         struct fsf_qtcb *qtcb = req->qtcb;
597
598         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
599                 return;
600
601         switch (qtcb->header.fsf_status) {
602         case FSF_GOOD:
603                 zfcp_fsf_exchange_port_evaluate(req);
604                 break;
605         case FSF_EXCHANGE_CONFIG_DATA_INCOMPLETE:
606                 zfcp_fsf_exchange_port_evaluate(req);
607                 zfcp_fsf_link_down_info_eval(req,
608                         &qtcb->header.fsf_status_qual.link_down_info);
609                 break;
610         }
611 }
612
613 static struct zfcp_fsf_req *zfcp_fsf_alloc(mempool_t *pool)
614 {
615         struct zfcp_fsf_req *req;
616
617         if (likely(pool))
618                 req = mempool_alloc(pool, GFP_ATOMIC);
619         else
620                 req = kmalloc(sizeof(*req), GFP_ATOMIC);
621
622         if (unlikely(!req))
623                 return NULL;
624
625         memset(req, 0, sizeof(*req));
626         req->pool = pool;
627         return req;
628 }
629
630 static struct fsf_qtcb *zfcp_qtcb_alloc(mempool_t *pool)
631 {
632         struct fsf_qtcb *qtcb;
633
634         if (likely(pool))
635                 qtcb = mempool_alloc(pool, GFP_ATOMIC);
636         else
637                 qtcb = kmem_cache_alloc(zfcp_fsf_qtcb_cache, GFP_ATOMIC);
638
639         if (unlikely(!qtcb))
640                 return NULL;
641
642         memset(qtcb, 0, sizeof(*qtcb));
643         return qtcb;
644 }
645
646 static struct zfcp_fsf_req *zfcp_fsf_req_create(struct zfcp_qdio *qdio,
647                                                 u32 fsf_cmd, u8 sbtype,
648                                                 mempool_t *pool)
649 {
650         struct zfcp_adapter *adapter = qdio->adapter;
651         struct zfcp_fsf_req *req = zfcp_fsf_alloc(pool);
652
653         if (unlikely(!req))
654                 return ERR_PTR(-ENOMEM);
655
656         if (adapter->req_no == 0)
657                 adapter->req_no++;
658
659         INIT_LIST_HEAD(&req->list);
660         init_timer(&req->timer);
661         init_completion(&req->completion);
662
663         req->adapter = adapter;
664         req->fsf_command = fsf_cmd;
665         req->req_id = adapter->req_no;
666
667         if (likely(fsf_cmd != FSF_QTCB_UNSOLICITED_STATUS)) {
668                 if (likely(pool))
669                         req->qtcb = zfcp_qtcb_alloc(adapter->pool.qtcb_pool);
670                 else
671                         req->qtcb = zfcp_qtcb_alloc(NULL);
672
673                 if (unlikely(!req->qtcb)) {
674                         zfcp_fsf_req_free(req);
675                         return ERR_PTR(-ENOMEM);
676                 }
677
678                 req->seq_no = adapter->fsf_req_seq_no;
679                 req->qtcb->prefix.req_seq_no = adapter->fsf_req_seq_no;
680                 req->qtcb->prefix.req_id = req->req_id;
681                 req->qtcb->prefix.ulp_info = 26;
682                 req->qtcb->prefix.qtcb_type = fsf_qtcb_type[req->fsf_command];
683                 req->qtcb->prefix.qtcb_version = FSF_QTCB_CURRENT_VERSION;
684                 req->qtcb->header.req_handle = req->req_id;
685                 req->qtcb->header.fsf_command = req->fsf_command;
686         }
687
688         zfcp_qdio_req_init(adapter->qdio, &req->qdio_req, req->req_id, sbtype,
689                            req->qtcb, sizeof(struct fsf_qtcb));
690
691         return req;
692 }
693
694 static int zfcp_fsf_req_send(struct zfcp_fsf_req *req)
695 {
696         struct zfcp_adapter *adapter = req->adapter;
697         struct zfcp_qdio *qdio = adapter->qdio;
698         int with_qtcb = (req->qtcb != NULL);
699         int req_id = req->req_id;
700
701         zfcp_reqlist_add(adapter->req_list, req);
702
703         req->qdio_req.qdio_outb_usage = atomic_read(&qdio->req_q_free);
704         req->issued = get_clock();
705         if (zfcp_qdio_send(qdio, &req->qdio_req)) {
706                 del_timer(&req->timer);
707                 /* lookup request again, list might have changed */
708                 zfcp_reqlist_find_rm(adapter->req_list, req_id);
709                 zfcp_erp_adapter_reopen(adapter, 0, "fsrs__1");
710                 return -EIO;
711         }
712
713         /* Don't increase for unsolicited status */
714         if (with_qtcb)
715                 adapter->fsf_req_seq_no++;
716         adapter->req_no++;
717
718         return 0;
719 }
720
721 /**
722  * zfcp_fsf_status_read - send status read request
723  * @adapter: pointer to struct zfcp_adapter
724  * @req_flags: request flags
725  * Returns: 0 on success, ERROR otherwise
726  */
727 int zfcp_fsf_status_read(struct zfcp_qdio *qdio)
728 {
729         struct zfcp_adapter *adapter = qdio->adapter;
730         struct zfcp_fsf_req *req;
731         struct fsf_status_read_buffer *sr_buf;
732         struct page *page;
733         int retval = -EIO;
734
735         spin_lock_irq(&qdio->req_q_lock);
736         if (zfcp_qdio_sbal_get(qdio))
737                 goto out;
738
739         req = zfcp_fsf_req_create(qdio, FSF_QTCB_UNSOLICITED_STATUS, 0,
740                                   adapter->pool.status_read_req);
741         if (IS_ERR(req)) {
742                 retval = PTR_ERR(req);
743                 goto out;
744         }
745
746         page = mempool_alloc(adapter->pool.sr_data, GFP_ATOMIC);
747         if (!page) {
748                 retval = -ENOMEM;
749                 goto failed_buf;
750         }
751         sr_buf = page_address(page);
752         memset(sr_buf, 0, sizeof(*sr_buf));
753         req->data = sr_buf;
754
755         zfcp_qdio_fill_next(qdio, &req->qdio_req, sr_buf, sizeof(*sr_buf));
756         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
757
758         retval = zfcp_fsf_req_send(req);
759         if (retval)
760                 goto failed_req_send;
761
762         goto out;
763
764 failed_req_send:
765         req->data = NULL;
766         mempool_free(virt_to_page(sr_buf), adapter->pool.sr_data);
767 failed_buf:
768         zfcp_dbf_hba_fsf_uss("fssr__1", req);
769         zfcp_fsf_req_free(req);
770 out:
771         spin_unlock_irq(&qdio->req_q_lock);
772         return retval;
773 }
774
775 static void zfcp_fsf_abort_fcp_command_handler(struct zfcp_fsf_req *req)
776 {
777         struct scsi_device *sdev = req->data;
778         struct zfcp_scsi_dev *zfcp_sdev;
779         union fsf_status_qual *fsq = &req->qtcb->header.fsf_status_qual;
780
781         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
782                 return;
783
784         zfcp_sdev = sdev_to_zfcp(sdev);
785
786         switch (req->qtcb->header.fsf_status) {
787         case FSF_PORT_HANDLE_NOT_VALID:
788                 if (fsq->word[0] == fsq->word[1]) {
789                         zfcp_erp_adapter_reopen(zfcp_sdev->port->adapter, 0,
790                                                 "fsafch1");
791                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
792                 }
793                 break;
794         case FSF_LUN_HANDLE_NOT_VALID:
795                 if (fsq->word[0] == fsq->word[1]) {
796                         zfcp_erp_port_reopen(zfcp_sdev->port, 0, "fsafch2");
797                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
798                 }
799                 break;
800         case FSF_FCP_COMMAND_DOES_NOT_EXIST:
801                 req->status |= ZFCP_STATUS_FSFREQ_ABORTNOTNEEDED;
802                 break;
803         case FSF_PORT_BOXED:
804                 zfcp_erp_set_port_status(zfcp_sdev->port,
805                                          ZFCP_STATUS_COMMON_ACCESS_BOXED);
806                 zfcp_erp_port_reopen(zfcp_sdev->port,
807                                      ZFCP_STATUS_COMMON_ERP_FAILED, "fsafch3");
808                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
809                 break;
810         case FSF_LUN_BOXED:
811                 zfcp_erp_set_lun_status(sdev, ZFCP_STATUS_COMMON_ACCESS_BOXED);
812                 zfcp_erp_lun_reopen(sdev, ZFCP_STATUS_COMMON_ERP_FAILED,
813                                     "fsafch4");
814                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
815                 break;
816         case FSF_ADAPTER_STATUS_AVAILABLE:
817                 switch (fsq->word[0]) {
818                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
819                         zfcp_fc_test_link(zfcp_sdev->port);
820                         /* fall through */
821                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
822                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
823                         break;
824                 }
825                 break;
826         case FSF_GOOD:
827                 req->status |= ZFCP_STATUS_FSFREQ_ABORTSUCCEEDED;
828                 break;
829         }
830 }
831
832 /**
833  * zfcp_fsf_abort_fcp_cmnd - abort running SCSI command
834  * @scmnd: The SCSI command to abort
835  * Returns: pointer to struct zfcp_fsf_req
836  */
837
838 struct zfcp_fsf_req *zfcp_fsf_abort_fcp_cmnd(struct scsi_cmnd *scmnd)
839 {
840         struct zfcp_fsf_req *req = NULL;
841         struct scsi_device *sdev = scmnd->device;
842         struct zfcp_scsi_dev *zfcp_sdev = sdev_to_zfcp(sdev);
843         struct zfcp_qdio *qdio = zfcp_sdev->port->adapter->qdio;
844         unsigned long old_req_id = (unsigned long) scmnd->host_scribble;
845
846         spin_lock_irq(&qdio->req_q_lock);
847         if (zfcp_qdio_sbal_get(qdio))
848                 goto out;
849         req = zfcp_fsf_req_create(qdio, FSF_QTCB_ABORT_FCP_CMND,
850                                   SBAL_SFLAGS0_TYPE_READ,
851                                   qdio->adapter->pool.scsi_abort);
852         if (IS_ERR(req)) {
853                 req = NULL;
854                 goto out;
855         }
856
857         if (unlikely(!(atomic_read(&zfcp_sdev->status) &
858                        ZFCP_STATUS_COMMON_UNBLOCKED)))
859                 goto out_error_free;
860
861         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
862
863         req->data = sdev;
864         req->handler = zfcp_fsf_abort_fcp_command_handler;
865         req->qtcb->header.lun_handle = zfcp_sdev->lun_handle;
866         req->qtcb->header.port_handle = zfcp_sdev->port->handle;
867         req->qtcb->bottom.support.req_handle = (u64) old_req_id;
868
869         zfcp_fsf_start_timer(req, ZFCP_SCSI_ER_TIMEOUT);
870         if (!zfcp_fsf_req_send(req))
871                 goto out;
872
873 out_error_free:
874         zfcp_fsf_req_free(req);
875         req = NULL;
876 out:
877         spin_unlock_irq(&qdio->req_q_lock);
878         return req;
879 }
880
881 static void zfcp_fsf_send_ct_handler(struct zfcp_fsf_req *req)
882 {
883         struct zfcp_adapter *adapter = req->adapter;
884         struct zfcp_fsf_ct_els *ct = req->data;
885         struct fsf_qtcb_header *header = &req->qtcb->header;
886
887         ct->status = -EINVAL;
888
889         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
890                 goto skip_fsfstatus;
891
892         switch (header->fsf_status) {
893         case FSF_GOOD:
894                 zfcp_dbf_san_res("fsscth2", req);
895                 ct->status = 0;
896                 break;
897         case FSF_SERVICE_CLASS_NOT_SUPPORTED:
898                 zfcp_fsf_class_not_supp(req);
899                 break;
900         case FSF_ADAPTER_STATUS_AVAILABLE:
901                 switch (header->fsf_status_qual.word[0]){
902                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
903                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
904                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
905                         break;
906                 }
907                 break;
908         case FSF_ACCESS_DENIED:
909                 break;
910         case FSF_PORT_BOXED:
911                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
912                 break;
913         case FSF_PORT_HANDLE_NOT_VALID:
914                 zfcp_erp_adapter_reopen(adapter, 0, "fsscth1");
915                 /* fall through */
916         case FSF_GENERIC_COMMAND_REJECTED:
917         case FSF_PAYLOAD_SIZE_MISMATCH:
918         case FSF_REQUEST_SIZE_TOO_LARGE:
919         case FSF_RESPONSE_SIZE_TOO_LARGE:
920         case FSF_SBAL_MISMATCH:
921                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
922                 break;
923         }
924
925 skip_fsfstatus:
926         if (ct->handler)
927                 ct->handler(ct->handler_data);
928 }
929
930 static void zfcp_fsf_setup_ct_els_unchained(struct zfcp_qdio *qdio,
931                                             struct zfcp_qdio_req *q_req,
932                                             struct scatterlist *sg_req,
933                                             struct scatterlist *sg_resp)
934 {
935         zfcp_qdio_fill_next(qdio, q_req, sg_virt(sg_req), sg_req->length);
936         zfcp_qdio_fill_next(qdio, q_req, sg_virt(sg_resp), sg_resp->length);
937         zfcp_qdio_set_sbale_last(qdio, q_req);
938 }
939
940 static int zfcp_fsf_setup_ct_els_sbals(struct zfcp_fsf_req *req,
941                                        struct scatterlist *sg_req,
942                                        struct scatterlist *sg_resp)
943 {
944         struct zfcp_adapter *adapter = req->adapter;
945         struct zfcp_qdio *qdio = adapter->qdio;
946         struct fsf_qtcb *qtcb = req->qtcb;
947         u32 feat = adapter->adapter_features;
948
949         if (zfcp_adapter_multi_buffer_active(adapter)) {
950                 if (zfcp_qdio_sbals_from_sg(qdio, &req->qdio_req, sg_req))
951                         return -EIO;
952                 if (zfcp_qdio_sbals_from_sg(qdio, &req->qdio_req, sg_resp))
953                         return -EIO;
954
955                 zfcp_qdio_set_data_div(qdio, &req->qdio_req,
956                                         zfcp_qdio_sbale_count(sg_req));
957                 zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
958                 zfcp_qdio_set_scount(qdio, &req->qdio_req);
959                 return 0;
960         }
961
962         /* use single, unchained SBAL if it can hold the request */
963         if (zfcp_qdio_sg_one_sbale(sg_req) && zfcp_qdio_sg_one_sbale(sg_resp)) {
964                 zfcp_fsf_setup_ct_els_unchained(qdio, &req->qdio_req,
965                                                 sg_req, sg_resp);
966                 return 0;
967         }
968
969         if (!(feat & FSF_FEATURE_ELS_CT_CHAINED_SBALS))
970                 return -EOPNOTSUPP;
971
972         if (zfcp_qdio_sbals_from_sg(qdio, &req->qdio_req, sg_req))
973                 return -EIO;
974
975         qtcb->bottom.support.req_buf_length = zfcp_qdio_real_bytes(sg_req);
976
977         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
978         zfcp_qdio_skip_to_last_sbale(qdio, &req->qdio_req);
979
980         if (zfcp_qdio_sbals_from_sg(qdio, &req->qdio_req, sg_resp))
981                 return -EIO;
982
983         qtcb->bottom.support.resp_buf_length = zfcp_qdio_real_bytes(sg_resp);
984
985         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
986
987         return 0;
988 }
989
990 static int zfcp_fsf_setup_ct_els(struct zfcp_fsf_req *req,
991                                  struct scatterlist *sg_req,
992                                  struct scatterlist *sg_resp,
993                                  unsigned int timeout)
994 {
995         int ret;
996
997         ret = zfcp_fsf_setup_ct_els_sbals(req, sg_req, sg_resp);
998         if (ret)
999                 return ret;
1000
1001         /* common settings for ct/gs and els requests */
1002         if (timeout > 255)
1003                 timeout = 255; /* max value accepted by hardware */
1004         req->qtcb->bottom.support.service_class = FSF_CLASS_3;
1005         req->qtcb->bottom.support.timeout = timeout;
1006         zfcp_fsf_start_timer(req, (timeout + 10) * HZ);
1007
1008         return 0;
1009 }
1010
1011 /**
1012  * zfcp_fsf_send_ct - initiate a Generic Service request (FC-GS)
1013  * @ct: pointer to struct zfcp_send_ct with data for request
1014  * @pool: if non-null this mempool is used to allocate struct zfcp_fsf_req
1015  */
1016 int zfcp_fsf_send_ct(struct zfcp_fc_wka_port *wka_port,
1017                      struct zfcp_fsf_ct_els *ct, mempool_t *pool,
1018                      unsigned int timeout)
1019 {
1020         struct zfcp_qdio *qdio = wka_port->adapter->qdio;
1021         struct zfcp_fsf_req *req;
1022         int ret = -EIO;
1023
1024         spin_lock_irq(&qdio->req_q_lock);
1025         if (zfcp_qdio_sbal_get(qdio))
1026                 goto out;
1027
1028         req = zfcp_fsf_req_create(qdio, FSF_QTCB_SEND_GENERIC,
1029                                   SBAL_SFLAGS0_TYPE_WRITE_READ, pool);
1030
1031         if (IS_ERR(req)) {
1032                 ret = PTR_ERR(req);
1033                 goto out;
1034         }
1035
1036         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1037         ret = zfcp_fsf_setup_ct_els(req, ct->req, ct->resp, timeout);
1038         if (ret)
1039                 goto failed_send;
1040
1041         req->handler = zfcp_fsf_send_ct_handler;
1042         req->qtcb->header.port_handle = wka_port->handle;
1043         req->data = ct;
1044
1045         zfcp_dbf_san_req("fssct_1", req, wka_port->d_id);
1046
1047         ret = zfcp_fsf_req_send(req);
1048         if (ret)
1049                 goto failed_send;
1050
1051         goto out;
1052
1053 failed_send:
1054         zfcp_fsf_req_free(req);
1055 out:
1056         spin_unlock_irq(&qdio->req_q_lock);
1057         return ret;
1058 }
1059
1060 static void zfcp_fsf_send_els_handler(struct zfcp_fsf_req *req)
1061 {
1062         struct zfcp_fsf_ct_els *send_els = req->data;
1063         struct zfcp_port *port = send_els->port;
1064         struct fsf_qtcb_header *header = &req->qtcb->header;
1065
1066         send_els->status = -EINVAL;
1067
1068         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1069                 goto skip_fsfstatus;
1070
1071         switch (header->fsf_status) {
1072         case FSF_GOOD:
1073                 zfcp_dbf_san_res("fsselh1", req);
1074                 send_els->status = 0;
1075                 break;
1076         case FSF_SERVICE_CLASS_NOT_SUPPORTED:
1077                 zfcp_fsf_class_not_supp(req);
1078                 break;
1079         case FSF_ADAPTER_STATUS_AVAILABLE:
1080                 switch (header->fsf_status_qual.word[0]){
1081                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1082                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
1083                 case FSF_SQ_RETRY_IF_POSSIBLE:
1084                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1085                         break;
1086                 }
1087                 break;
1088         case FSF_ELS_COMMAND_REJECTED:
1089         case FSF_PAYLOAD_SIZE_MISMATCH:
1090         case FSF_REQUEST_SIZE_TOO_LARGE:
1091         case FSF_RESPONSE_SIZE_TOO_LARGE:
1092                 break;
1093         case FSF_ACCESS_DENIED:
1094                 if (port) {
1095                         zfcp_cfdc_port_denied(port, &header->fsf_status_qual);
1096                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1097                 }
1098                 break;
1099         case FSF_SBAL_MISMATCH:
1100                 /* should never occur, avoided in zfcp_fsf_send_els */
1101                 /* fall through */
1102         default:
1103                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1104                 break;
1105         }
1106 skip_fsfstatus:
1107         if (send_els->handler)
1108                 send_els->handler(send_els->handler_data);
1109 }
1110
1111 /**
1112  * zfcp_fsf_send_els - initiate an ELS command (FC-FS)
1113  * @els: pointer to struct zfcp_send_els with data for the command
1114  */
1115 int zfcp_fsf_send_els(struct zfcp_adapter *adapter, u32 d_id,
1116                       struct zfcp_fsf_ct_els *els, unsigned int timeout)
1117 {
1118         struct zfcp_fsf_req *req;
1119         struct zfcp_qdio *qdio = adapter->qdio;
1120         int ret = -EIO;
1121
1122         spin_lock_irq(&qdio->req_q_lock);
1123         if (zfcp_qdio_sbal_get(qdio))
1124                 goto out;
1125
1126         req = zfcp_fsf_req_create(qdio, FSF_QTCB_SEND_ELS,
1127                                   SBAL_SFLAGS0_TYPE_WRITE_READ, NULL);
1128
1129         if (IS_ERR(req)) {
1130                 ret = PTR_ERR(req);
1131                 goto out;
1132         }
1133
1134         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1135
1136         if (!zfcp_adapter_multi_buffer_active(adapter))
1137                 zfcp_qdio_sbal_limit(qdio, &req->qdio_req, 2);
1138
1139         ret = zfcp_fsf_setup_ct_els(req, els->req, els->resp, timeout);
1140
1141         if (ret)
1142                 goto failed_send;
1143
1144         hton24(req->qtcb->bottom.support.d_id, d_id);
1145         req->handler = zfcp_fsf_send_els_handler;
1146         req->data = els;
1147
1148         zfcp_dbf_san_req("fssels1", req, d_id);
1149
1150         ret = zfcp_fsf_req_send(req);
1151         if (ret)
1152                 goto failed_send;
1153
1154         goto out;
1155
1156 failed_send:
1157         zfcp_fsf_req_free(req);
1158 out:
1159         spin_unlock_irq(&qdio->req_q_lock);
1160         return ret;
1161 }
1162
1163 int zfcp_fsf_exchange_config_data(struct zfcp_erp_action *erp_action)
1164 {
1165         struct zfcp_fsf_req *req;
1166         struct zfcp_qdio *qdio = erp_action->adapter->qdio;
1167         int retval = -EIO;
1168
1169         spin_lock_irq(&qdio->req_q_lock);
1170         if (zfcp_qdio_sbal_get(qdio))
1171                 goto out;
1172
1173         req = zfcp_fsf_req_create(qdio, FSF_QTCB_EXCHANGE_CONFIG_DATA,
1174                                   SBAL_SFLAGS0_TYPE_READ,
1175                                   qdio->adapter->pool.erp_req);
1176
1177         if (IS_ERR(req)) {
1178                 retval = PTR_ERR(req);
1179                 goto out;
1180         }
1181
1182         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1183         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1184
1185         req->qtcb->bottom.config.feature_selection =
1186                         FSF_FEATURE_CFDC |
1187                         FSF_FEATURE_LUN_SHARING |
1188                         FSF_FEATURE_NOTIFICATION_LOST |
1189                         FSF_FEATURE_UPDATE_ALERT;
1190         req->erp_action = erp_action;
1191         req->handler = zfcp_fsf_exchange_config_data_handler;
1192         erp_action->fsf_req_id = req->req_id;
1193
1194         zfcp_fsf_start_erp_timer(req);
1195         retval = zfcp_fsf_req_send(req);
1196         if (retval) {
1197                 zfcp_fsf_req_free(req);
1198                 erp_action->fsf_req_id = 0;
1199         }
1200 out:
1201         spin_unlock_irq(&qdio->req_q_lock);
1202         return retval;
1203 }
1204
1205 int zfcp_fsf_exchange_config_data_sync(struct zfcp_qdio *qdio,
1206                                        struct fsf_qtcb_bottom_config *data)
1207 {
1208         struct zfcp_fsf_req *req = NULL;
1209         int retval = -EIO;
1210
1211         spin_lock_irq(&qdio->req_q_lock);
1212         if (zfcp_qdio_sbal_get(qdio))
1213                 goto out_unlock;
1214
1215         req = zfcp_fsf_req_create(qdio, FSF_QTCB_EXCHANGE_CONFIG_DATA,
1216                                   SBAL_SFLAGS0_TYPE_READ, NULL);
1217
1218         if (IS_ERR(req)) {
1219                 retval = PTR_ERR(req);
1220                 goto out_unlock;
1221         }
1222
1223         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1224         req->handler = zfcp_fsf_exchange_config_data_handler;
1225
1226         req->qtcb->bottom.config.feature_selection =
1227                         FSF_FEATURE_CFDC |
1228                         FSF_FEATURE_LUN_SHARING |
1229                         FSF_FEATURE_NOTIFICATION_LOST |
1230                         FSF_FEATURE_UPDATE_ALERT;
1231
1232         if (data)
1233                 req->data = data;
1234
1235         zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
1236         retval = zfcp_fsf_req_send(req);
1237         spin_unlock_irq(&qdio->req_q_lock);
1238         if (!retval)
1239                 wait_for_completion(&req->completion);
1240
1241         zfcp_fsf_req_free(req);
1242         return retval;
1243
1244 out_unlock:
1245         spin_unlock_irq(&qdio->req_q_lock);
1246         return retval;
1247 }
1248
1249 /**
1250  * zfcp_fsf_exchange_port_data - request information about local port
1251  * @erp_action: ERP action for the adapter for which port data is requested
1252  * Returns: 0 on success, error otherwise
1253  */
1254 int zfcp_fsf_exchange_port_data(struct zfcp_erp_action *erp_action)
1255 {
1256         struct zfcp_qdio *qdio = erp_action->adapter->qdio;
1257         struct zfcp_fsf_req *req;
1258         int retval = -EIO;
1259
1260         if (!(qdio->adapter->adapter_features & FSF_FEATURE_HBAAPI_MANAGEMENT))
1261                 return -EOPNOTSUPP;
1262
1263         spin_lock_irq(&qdio->req_q_lock);
1264         if (zfcp_qdio_sbal_get(qdio))
1265                 goto out;
1266
1267         req = zfcp_fsf_req_create(qdio, FSF_QTCB_EXCHANGE_PORT_DATA,
1268                                   SBAL_SFLAGS0_TYPE_READ,
1269                                   qdio->adapter->pool.erp_req);
1270
1271         if (IS_ERR(req)) {
1272                 retval = PTR_ERR(req);
1273                 goto out;
1274         }
1275
1276         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1277         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1278
1279         req->handler = zfcp_fsf_exchange_port_data_handler;
1280         req->erp_action = erp_action;
1281         erp_action->fsf_req_id = req->req_id;
1282
1283         zfcp_fsf_start_erp_timer(req);
1284         retval = zfcp_fsf_req_send(req);
1285         if (retval) {
1286                 zfcp_fsf_req_free(req);
1287                 erp_action->fsf_req_id = 0;
1288         }
1289 out:
1290         spin_unlock_irq(&qdio->req_q_lock);
1291         return retval;
1292 }
1293
1294 /**
1295  * zfcp_fsf_exchange_port_data_sync - request information about local port
1296  * @qdio: pointer to struct zfcp_qdio
1297  * @data: pointer to struct fsf_qtcb_bottom_port
1298  * Returns: 0 on success, error otherwise
1299  */
1300 int zfcp_fsf_exchange_port_data_sync(struct zfcp_qdio *qdio,
1301                                      struct fsf_qtcb_bottom_port *data)
1302 {
1303         struct zfcp_fsf_req *req = NULL;
1304         int retval = -EIO;
1305
1306         if (!(qdio->adapter->adapter_features & FSF_FEATURE_HBAAPI_MANAGEMENT))
1307                 return -EOPNOTSUPP;
1308
1309         spin_lock_irq(&qdio->req_q_lock);
1310         if (zfcp_qdio_sbal_get(qdio))
1311                 goto out_unlock;
1312
1313         req = zfcp_fsf_req_create(qdio, FSF_QTCB_EXCHANGE_PORT_DATA,
1314                                   SBAL_SFLAGS0_TYPE_READ, NULL);
1315
1316         if (IS_ERR(req)) {
1317                 retval = PTR_ERR(req);
1318                 goto out_unlock;
1319         }
1320
1321         if (data)
1322                 req->data = data;
1323
1324         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1325
1326         req->handler = zfcp_fsf_exchange_port_data_handler;
1327         zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
1328         retval = zfcp_fsf_req_send(req);
1329         spin_unlock_irq(&qdio->req_q_lock);
1330
1331         if (!retval)
1332                 wait_for_completion(&req->completion);
1333
1334         zfcp_fsf_req_free(req);
1335
1336         return retval;
1337
1338 out_unlock:
1339         spin_unlock_irq(&qdio->req_q_lock);
1340         return retval;
1341 }
1342
1343 static void zfcp_fsf_open_port_handler(struct zfcp_fsf_req *req)
1344 {
1345         struct zfcp_port *port = req->data;
1346         struct fsf_qtcb_header *header = &req->qtcb->header;
1347         struct fc_els_flogi *plogi;
1348
1349         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1350                 goto out;
1351
1352         switch (header->fsf_status) {
1353         case FSF_PORT_ALREADY_OPEN:
1354                 break;
1355         case FSF_ACCESS_DENIED:
1356                 zfcp_cfdc_port_denied(port, &header->fsf_status_qual);
1357                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1358                 break;
1359         case FSF_MAXIMUM_NUMBER_OF_PORTS_EXCEEDED:
1360                 dev_warn(&req->adapter->ccw_device->dev,
1361                          "Not enough FCP adapter resources to open "
1362                          "remote port 0x%016Lx\n",
1363                          (unsigned long long)port->wwpn);
1364                 zfcp_erp_set_port_status(port,
1365                                          ZFCP_STATUS_COMMON_ERP_FAILED);
1366                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1367                 break;
1368         case FSF_ADAPTER_STATUS_AVAILABLE:
1369                 switch (header->fsf_status_qual.word[0]) {
1370                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1371                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
1372                 case FSF_SQ_NO_RETRY_POSSIBLE:
1373                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1374                         break;
1375                 }
1376                 break;
1377         case FSF_GOOD:
1378                 port->handle = header->port_handle;
1379                 atomic_set_mask(ZFCP_STATUS_COMMON_OPEN |
1380                                 ZFCP_STATUS_PORT_PHYS_OPEN, &port->status);
1381                 atomic_clear_mask(ZFCP_STATUS_COMMON_ACCESS_DENIED |
1382                                   ZFCP_STATUS_COMMON_ACCESS_BOXED,
1383                                   &port->status);
1384                 /* check whether D_ID has changed during open */
1385                 /*
1386                  * FIXME: This check is not airtight, as the FCP channel does
1387                  * not monitor closures of target port connections caused on
1388                  * the remote side. Thus, they might miss out on invalidating
1389                  * locally cached WWPNs (and other N_Port parameters) of gone
1390                  * target ports. So, our heroic attempt to make things safe
1391                  * could be undermined by 'open port' response data tagged with
1392                  * obsolete WWPNs. Another reason to monitor potential
1393                  * connection closures ourself at least (by interpreting
1394                  * incoming ELS' and unsolicited status). It just crosses my
1395                  * mind that one should be able to cross-check by means of
1396                  * another GID_PN straight after a port has been opened.
1397                  * Alternately, an ADISC/PDISC ELS should suffice, as well.
1398                  */
1399                 plogi = (struct fc_els_flogi *) req->qtcb->bottom.support.els;
1400                 if (req->qtcb->bottom.support.els1_length >=
1401                     FSF_PLOGI_MIN_LEN)
1402                                 zfcp_fc_plogi_evaluate(port, plogi);
1403                 break;
1404         case FSF_UNKNOWN_OP_SUBTYPE:
1405                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1406                 break;
1407         }
1408
1409 out:
1410         put_device(&port->dev);
1411 }
1412
1413 /**
1414  * zfcp_fsf_open_port - create and send open port request
1415  * @erp_action: pointer to struct zfcp_erp_action
1416  * Returns: 0 on success, error otherwise
1417  */
1418 int zfcp_fsf_open_port(struct zfcp_erp_action *erp_action)
1419 {
1420         struct zfcp_qdio *qdio = erp_action->adapter->qdio;
1421         struct zfcp_port *port = erp_action->port;
1422         struct zfcp_fsf_req *req;
1423         int retval = -EIO;
1424
1425         spin_lock_irq(&qdio->req_q_lock);
1426         if (zfcp_qdio_sbal_get(qdio))
1427                 goto out;
1428
1429         req = zfcp_fsf_req_create(qdio, FSF_QTCB_OPEN_PORT_WITH_DID,
1430                                   SBAL_SFLAGS0_TYPE_READ,
1431                                   qdio->adapter->pool.erp_req);
1432
1433         if (IS_ERR(req)) {
1434                 retval = PTR_ERR(req);
1435                 goto out;
1436         }
1437
1438         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1439         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1440
1441         req->handler = zfcp_fsf_open_port_handler;
1442         hton24(req->qtcb->bottom.support.d_id, port->d_id);
1443         req->data = port;
1444         req->erp_action = erp_action;
1445         erp_action->fsf_req_id = req->req_id;
1446         get_device(&port->dev);
1447
1448         zfcp_fsf_start_erp_timer(req);
1449         retval = zfcp_fsf_req_send(req);
1450         if (retval) {
1451                 zfcp_fsf_req_free(req);
1452                 erp_action->fsf_req_id = 0;
1453                 put_device(&port->dev);
1454         }
1455 out:
1456         spin_unlock_irq(&qdio->req_q_lock);
1457         return retval;
1458 }
1459
1460 static void zfcp_fsf_close_port_handler(struct zfcp_fsf_req *req)
1461 {
1462         struct zfcp_port *port = req->data;
1463
1464         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1465                 return;
1466
1467         switch (req->qtcb->header.fsf_status) {
1468         case FSF_PORT_HANDLE_NOT_VALID:
1469                 zfcp_erp_adapter_reopen(port->adapter, 0, "fscph_1");
1470                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1471                 break;
1472         case FSF_ADAPTER_STATUS_AVAILABLE:
1473                 break;
1474         case FSF_GOOD:
1475                 zfcp_erp_clear_port_status(port, ZFCP_STATUS_COMMON_OPEN);
1476                 break;
1477         }
1478 }
1479
1480 /**
1481  * zfcp_fsf_close_port - create and send close port request
1482  * @erp_action: pointer to struct zfcp_erp_action
1483  * Returns: 0 on success, error otherwise
1484  */
1485 int zfcp_fsf_close_port(struct zfcp_erp_action *erp_action)
1486 {
1487         struct zfcp_qdio *qdio = erp_action->adapter->qdio;
1488         struct zfcp_fsf_req *req;
1489         int retval = -EIO;
1490
1491         spin_lock_irq(&qdio->req_q_lock);
1492         if (zfcp_qdio_sbal_get(qdio))
1493                 goto out;
1494
1495         req = zfcp_fsf_req_create(qdio, FSF_QTCB_CLOSE_PORT,
1496                                   SBAL_SFLAGS0_TYPE_READ,
1497                                   qdio->adapter->pool.erp_req);
1498
1499         if (IS_ERR(req)) {
1500                 retval = PTR_ERR(req);
1501                 goto out;
1502         }
1503
1504         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1505         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1506
1507         req->handler = zfcp_fsf_close_port_handler;
1508         req->data = erp_action->port;
1509         req->erp_action = erp_action;
1510         req->qtcb->header.port_handle = erp_action->port->handle;
1511         erp_action->fsf_req_id = req->req_id;
1512
1513         zfcp_fsf_start_erp_timer(req);
1514         retval = zfcp_fsf_req_send(req);
1515         if (retval) {
1516                 zfcp_fsf_req_free(req);
1517                 erp_action->fsf_req_id = 0;
1518         }
1519 out:
1520         spin_unlock_irq(&qdio->req_q_lock);
1521         return retval;
1522 }
1523
1524 static void zfcp_fsf_open_wka_port_handler(struct zfcp_fsf_req *req)
1525 {
1526         struct zfcp_fc_wka_port *wka_port = req->data;
1527         struct fsf_qtcb_header *header = &req->qtcb->header;
1528
1529         if (req->status & ZFCP_STATUS_FSFREQ_ERROR) {
1530                 wka_port->status = ZFCP_FC_WKA_PORT_OFFLINE;
1531                 goto out;
1532         }
1533
1534         switch (header->fsf_status) {
1535         case FSF_MAXIMUM_NUMBER_OF_PORTS_EXCEEDED:
1536                 dev_warn(&req->adapter->ccw_device->dev,
1537                          "Opening WKA port 0x%x failed\n", wka_port->d_id);
1538                 /* fall through */
1539         case FSF_ADAPTER_STATUS_AVAILABLE:
1540                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1541                 /* fall through */
1542         case FSF_ACCESS_DENIED:
1543                 wka_port->status = ZFCP_FC_WKA_PORT_OFFLINE;
1544                 break;
1545         case FSF_GOOD:
1546                 wka_port->handle = header->port_handle;
1547                 /* fall through */
1548         case FSF_PORT_ALREADY_OPEN:
1549                 wka_port->status = ZFCP_FC_WKA_PORT_ONLINE;
1550         }
1551 out:
1552         wake_up(&wka_port->completion_wq);
1553 }
1554
1555 /**
1556  * zfcp_fsf_open_wka_port - create and send open wka-port request
1557  * @wka_port: pointer to struct zfcp_fc_wka_port
1558  * Returns: 0 on success, error otherwise
1559  */
1560 int zfcp_fsf_open_wka_port(struct zfcp_fc_wka_port *wka_port)
1561 {
1562         struct zfcp_qdio *qdio = wka_port->adapter->qdio;
1563         struct zfcp_fsf_req *req;
1564         int retval = -EIO;
1565
1566         spin_lock_irq(&qdio->req_q_lock);
1567         if (zfcp_qdio_sbal_get(qdio))
1568                 goto out;
1569
1570         req = zfcp_fsf_req_create(qdio, FSF_QTCB_OPEN_PORT_WITH_DID,
1571                                   SBAL_SFLAGS0_TYPE_READ,
1572                                   qdio->adapter->pool.erp_req);
1573
1574         if (IS_ERR(req)) {
1575                 retval = PTR_ERR(req);
1576                 goto out;
1577         }
1578
1579         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1580         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1581
1582         req->handler = zfcp_fsf_open_wka_port_handler;
1583         hton24(req->qtcb->bottom.support.d_id, wka_port->d_id);
1584         req->data = wka_port;
1585
1586         zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
1587         retval = zfcp_fsf_req_send(req);
1588         if (retval)
1589                 zfcp_fsf_req_free(req);
1590 out:
1591         spin_unlock_irq(&qdio->req_q_lock);
1592         return retval;
1593 }
1594
1595 static void zfcp_fsf_close_wka_port_handler(struct zfcp_fsf_req *req)
1596 {
1597         struct zfcp_fc_wka_port *wka_port = req->data;
1598
1599         if (req->qtcb->header.fsf_status == FSF_PORT_HANDLE_NOT_VALID) {
1600                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1601                 zfcp_erp_adapter_reopen(wka_port->adapter, 0, "fscwph1");
1602         }
1603
1604         wka_port->status = ZFCP_FC_WKA_PORT_OFFLINE;
1605         wake_up(&wka_port->completion_wq);
1606 }
1607
1608 /**
1609  * zfcp_fsf_close_wka_port - create and send close wka port request
1610  * @wka_port: WKA port to open
1611  * Returns: 0 on success, error otherwise
1612  */
1613 int zfcp_fsf_close_wka_port(struct zfcp_fc_wka_port *wka_port)
1614 {
1615         struct zfcp_qdio *qdio = wka_port->adapter->qdio;
1616         struct zfcp_fsf_req *req;
1617         int retval = -EIO;
1618
1619         spin_lock_irq(&qdio->req_q_lock);
1620         if (zfcp_qdio_sbal_get(qdio))
1621                 goto out;
1622
1623         req = zfcp_fsf_req_create(qdio, FSF_QTCB_CLOSE_PORT,
1624                                   SBAL_SFLAGS0_TYPE_READ,
1625                                   qdio->adapter->pool.erp_req);
1626
1627         if (IS_ERR(req)) {
1628                 retval = PTR_ERR(req);
1629                 goto out;
1630         }
1631
1632         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1633         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1634
1635         req->handler = zfcp_fsf_close_wka_port_handler;
1636         req->data = wka_port;
1637         req->qtcb->header.port_handle = wka_port->handle;
1638
1639         zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
1640         retval = zfcp_fsf_req_send(req);
1641         if (retval)
1642                 zfcp_fsf_req_free(req);
1643 out:
1644         spin_unlock_irq(&qdio->req_q_lock);
1645         return retval;
1646 }
1647
1648 static void zfcp_fsf_close_physical_port_handler(struct zfcp_fsf_req *req)
1649 {
1650         struct zfcp_port *port = req->data;
1651         struct fsf_qtcb_header *header = &req->qtcb->header;
1652         struct scsi_device *sdev;
1653
1654         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1655                 return;
1656
1657         switch (header->fsf_status) {
1658         case FSF_PORT_HANDLE_NOT_VALID:
1659                 zfcp_erp_adapter_reopen(port->adapter, 0, "fscpph1");
1660                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1661                 break;
1662         case FSF_ACCESS_DENIED:
1663                 zfcp_cfdc_port_denied(port, &header->fsf_status_qual);
1664                 break;
1665         case FSF_PORT_BOXED:
1666                 /* can't use generic zfcp_erp_modify_port_status because
1667                  * ZFCP_STATUS_COMMON_OPEN must not be reset for the port */
1668                 atomic_clear_mask(ZFCP_STATUS_PORT_PHYS_OPEN, &port->status);
1669                 shost_for_each_device(sdev, port->adapter->scsi_host)
1670                         if (sdev_to_zfcp(sdev)->port == port)
1671                                 atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN,
1672                                                   &sdev_to_zfcp(sdev)->status);
1673                 zfcp_erp_set_port_status(port, ZFCP_STATUS_COMMON_ACCESS_BOXED);
1674                 zfcp_erp_port_reopen(port, ZFCP_STATUS_COMMON_ERP_FAILED,
1675                                      "fscpph2");
1676                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1677                 break;
1678         case FSF_ADAPTER_STATUS_AVAILABLE:
1679                 switch (header->fsf_status_qual.word[0]) {
1680                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1681                         /* fall through */
1682                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
1683                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1684                         break;
1685                 }
1686                 break;
1687         case FSF_GOOD:
1688                 /* can't use generic zfcp_erp_modify_port_status because
1689                  * ZFCP_STATUS_COMMON_OPEN must not be reset for the port
1690                  */
1691                 atomic_clear_mask(ZFCP_STATUS_PORT_PHYS_OPEN, &port->status);
1692                 shost_for_each_device(sdev, port->adapter->scsi_host)
1693                         if (sdev_to_zfcp(sdev)->port == port)
1694                                 atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN,
1695                                                   &sdev_to_zfcp(sdev)->status);
1696                 break;
1697         }
1698 }
1699
1700 /**
1701  * zfcp_fsf_close_physical_port - close physical port
1702  * @erp_action: pointer to struct zfcp_erp_action
1703  * Returns: 0 on success
1704  */
1705 int zfcp_fsf_close_physical_port(struct zfcp_erp_action *erp_action)
1706 {
1707         struct zfcp_qdio *qdio = erp_action->adapter->qdio;
1708         struct zfcp_fsf_req *req;
1709         int retval = -EIO;
1710
1711         spin_lock_irq(&qdio->req_q_lock);
1712         if (zfcp_qdio_sbal_get(qdio))
1713                 goto out;
1714
1715         req = zfcp_fsf_req_create(qdio, FSF_QTCB_CLOSE_PHYSICAL_PORT,
1716                                   SBAL_SFLAGS0_TYPE_READ,
1717                                   qdio->adapter->pool.erp_req);
1718
1719         if (IS_ERR(req)) {
1720                 retval = PTR_ERR(req);
1721                 goto out;
1722         }
1723
1724         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1725         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1726
1727         req->data = erp_action->port;
1728         req->qtcb->header.port_handle = erp_action->port->handle;
1729         req->erp_action = erp_action;
1730         req->handler = zfcp_fsf_close_physical_port_handler;
1731         erp_action->fsf_req_id = req->req_id;
1732
1733         zfcp_fsf_start_erp_timer(req);
1734         retval = zfcp_fsf_req_send(req);
1735         if (retval) {
1736                 zfcp_fsf_req_free(req);
1737                 erp_action->fsf_req_id = 0;
1738         }
1739 out:
1740         spin_unlock_irq(&qdio->req_q_lock);
1741         return retval;
1742 }
1743
1744 static void zfcp_fsf_open_lun_handler(struct zfcp_fsf_req *req)
1745 {
1746         struct zfcp_adapter *adapter = req->adapter;
1747         struct scsi_device *sdev = req->data;
1748         struct zfcp_scsi_dev *zfcp_sdev;
1749         struct fsf_qtcb_header *header = &req->qtcb->header;
1750         struct fsf_qtcb_bottom_support *bottom = &req->qtcb->bottom.support;
1751
1752         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1753                 return;
1754
1755         zfcp_sdev = sdev_to_zfcp(sdev);
1756
1757         atomic_clear_mask(ZFCP_STATUS_COMMON_ACCESS_DENIED |
1758                           ZFCP_STATUS_COMMON_ACCESS_BOXED |
1759                           ZFCP_STATUS_LUN_SHARED |
1760                           ZFCP_STATUS_LUN_READONLY,
1761                           &zfcp_sdev->status);
1762
1763         switch (header->fsf_status) {
1764
1765         case FSF_PORT_HANDLE_NOT_VALID:
1766                 zfcp_erp_adapter_reopen(adapter, 0, "fsouh_1");
1767                 /* fall through */
1768         case FSF_LUN_ALREADY_OPEN:
1769                 break;
1770         case FSF_ACCESS_DENIED:
1771                 zfcp_cfdc_lun_denied(sdev, &header->fsf_status_qual);
1772                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1773                 break;
1774         case FSF_PORT_BOXED:
1775                 zfcp_erp_set_port_status(zfcp_sdev->port,
1776                                          ZFCP_STATUS_COMMON_ACCESS_BOXED);
1777                 zfcp_erp_port_reopen(zfcp_sdev->port,
1778                                      ZFCP_STATUS_COMMON_ERP_FAILED, "fsouh_2");
1779                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1780                 break;
1781         case FSF_LUN_SHARING_VIOLATION:
1782                 zfcp_cfdc_lun_shrng_vltn(sdev, &header->fsf_status_qual);
1783                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1784                 break;
1785         case FSF_MAXIMUM_NUMBER_OF_LUNS_EXCEEDED:
1786                 dev_warn(&adapter->ccw_device->dev,
1787                          "No handle is available for LUN "
1788                          "0x%016Lx on port 0x%016Lx\n",
1789                          (unsigned long long)zfcp_scsi_dev_lun(sdev),
1790                          (unsigned long long)zfcp_sdev->port->wwpn);
1791                 zfcp_erp_set_lun_status(sdev, ZFCP_STATUS_COMMON_ERP_FAILED);
1792                 /* fall through */
1793         case FSF_INVALID_COMMAND_OPTION:
1794                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1795                 break;
1796         case FSF_ADAPTER_STATUS_AVAILABLE:
1797                 switch (header->fsf_status_qual.word[0]) {
1798                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1799                         zfcp_fc_test_link(zfcp_sdev->port);
1800                         /* fall through */
1801                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
1802                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1803                         break;
1804                 }
1805                 break;
1806
1807         case FSF_GOOD:
1808                 zfcp_sdev->lun_handle = header->lun_handle;
1809                 atomic_set_mask(ZFCP_STATUS_COMMON_OPEN, &zfcp_sdev->status);
1810                 zfcp_cfdc_open_lun_eval(sdev, bottom);
1811                 break;
1812         }
1813 }
1814
1815 /**
1816  * zfcp_fsf_open_lun - open LUN
1817  * @erp_action: pointer to struct zfcp_erp_action
1818  * Returns: 0 on success, error otherwise
1819  */
1820 int zfcp_fsf_open_lun(struct zfcp_erp_action *erp_action)
1821 {
1822         struct zfcp_adapter *adapter = erp_action->adapter;
1823         struct zfcp_qdio *qdio = adapter->qdio;
1824         struct zfcp_fsf_req *req;
1825         int retval = -EIO;
1826
1827         spin_lock_irq(&qdio->req_q_lock);
1828         if (zfcp_qdio_sbal_get(qdio))
1829                 goto out;
1830
1831         req = zfcp_fsf_req_create(qdio, FSF_QTCB_OPEN_LUN,
1832                                   SBAL_SFLAGS0_TYPE_READ,
1833                                   adapter->pool.erp_req);
1834
1835         if (IS_ERR(req)) {
1836                 retval = PTR_ERR(req);
1837                 goto out;
1838         }
1839
1840         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1841         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1842
1843         req->qtcb->header.port_handle = erp_action->port->handle;
1844         req->qtcb->bottom.support.fcp_lun = zfcp_scsi_dev_lun(erp_action->sdev);
1845         req->handler = zfcp_fsf_open_lun_handler;
1846         req->data = erp_action->sdev;
1847         req->erp_action = erp_action;
1848         erp_action->fsf_req_id = req->req_id;
1849
1850         if (!(adapter->connection_features & FSF_FEATURE_NPIV_MODE))
1851                 req->qtcb->bottom.support.option = FSF_OPEN_LUN_SUPPRESS_BOXING;
1852
1853         zfcp_fsf_start_erp_timer(req);
1854         retval = zfcp_fsf_req_send(req);
1855         if (retval) {
1856                 zfcp_fsf_req_free(req);
1857                 erp_action->fsf_req_id = 0;
1858         }
1859 out:
1860         spin_unlock_irq(&qdio->req_q_lock);
1861         return retval;
1862 }
1863
1864 static void zfcp_fsf_close_lun_handler(struct zfcp_fsf_req *req)
1865 {
1866         struct scsi_device *sdev = req->data;
1867         struct zfcp_scsi_dev *zfcp_sdev;
1868
1869         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1870                 return;
1871
1872         zfcp_sdev = sdev_to_zfcp(sdev);
1873
1874         switch (req->qtcb->header.fsf_status) {
1875         case FSF_PORT_HANDLE_NOT_VALID:
1876                 zfcp_erp_adapter_reopen(zfcp_sdev->port->adapter, 0, "fscuh_1");
1877                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1878                 break;
1879         case FSF_LUN_HANDLE_NOT_VALID:
1880                 zfcp_erp_port_reopen(zfcp_sdev->port, 0, "fscuh_2");
1881                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1882                 break;
1883         case FSF_PORT_BOXED:
1884                 zfcp_erp_set_port_status(zfcp_sdev->port,
1885                                          ZFCP_STATUS_COMMON_ACCESS_BOXED);
1886                 zfcp_erp_port_reopen(zfcp_sdev->port,
1887                                      ZFCP_STATUS_COMMON_ERP_FAILED, "fscuh_3");
1888                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1889                 break;
1890         case FSF_ADAPTER_STATUS_AVAILABLE:
1891                 switch (req->qtcb->header.fsf_status_qual.word[0]) {
1892                 case FSF_SQ_INVOKE_LINK_TEST_PROCEDURE:
1893                         zfcp_fc_test_link(zfcp_sdev->port);
1894                         /* fall through */
1895                 case FSF_SQ_ULP_DEPENDENT_ERP_REQUIRED:
1896                         req->status |= ZFCP_STATUS_FSFREQ_ERROR;
1897                         break;
1898                 }
1899                 break;
1900         case FSF_GOOD:
1901                 atomic_clear_mask(ZFCP_STATUS_COMMON_OPEN, &zfcp_sdev->status);
1902                 break;
1903         }
1904 }
1905
1906 /**
1907  * zfcp_fsf_close_LUN - close LUN
1908  * @erp_action: pointer to erp_action triggering the "close LUN"
1909  * Returns: 0 on success, error otherwise
1910  */
1911 int zfcp_fsf_close_lun(struct zfcp_erp_action *erp_action)
1912 {
1913         struct zfcp_qdio *qdio = erp_action->adapter->qdio;
1914         struct zfcp_scsi_dev *zfcp_sdev = sdev_to_zfcp(erp_action->sdev);
1915         struct zfcp_fsf_req *req;
1916         int retval = -EIO;
1917
1918         spin_lock_irq(&qdio->req_q_lock);
1919         if (zfcp_qdio_sbal_get(qdio))
1920                 goto out;
1921
1922         req = zfcp_fsf_req_create(qdio, FSF_QTCB_CLOSE_LUN,
1923                                   SBAL_SFLAGS0_TYPE_READ,
1924                                   qdio->adapter->pool.erp_req);
1925
1926         if (IS_ERR(req)) {
1927                 retval = PTR_ERR(req);
1928                 goto out;
1929         }
1930
1931         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
1932         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
1933
1934         req->qtcb->header.port_handle = erp_action->port->handle;
1935         req->qtcb->header.lun_handle = zfcp_sdev->lun_handle;
1936         req->handler = zfcp_fsf_close_lun_handler;
1937         req->data = erp_action->sdev;
1938         req->erp_action = erp_action;
1939         erp_action->fsf_req_id = req->req_id;
1940
1941         zfcp_fsf_start_erp_timer(req);
1942         retval = zfcp_fsf_req_send(req);
1943         if (retval) {
1944                 zfcp_fsf_req_free(req);
1945                 erp_action->fsf_req_id = 0;
1946         }
1947 out:
1948         spin_unlock_irq(&qdio->req_q_lock);
1949         return retval;
1950 }
1951
1952 static void zfcp_fsf_update_lat(struct fsf_latency_record *lat_rec, u32 lat)
1953 {
1954         lat_rec->sum += lat;
1955         lat_rec->min = min(lat_rec->min, lat);
1956         lat_rec->max = max(lat_rec->max, lat);
1957 }
1958
1959 static void zfcp_fsf_req_trace(struct zfcp_fsf_req *req, struct scsi_cmnd *scsi)
1960 {
1961         struct fsf_qual_latency_info *lat_in;
1962         struct latency_cont *lat = NULL;
1963         struct zfcp_scsi_dev *zfcp_sdev;
1964         struct zfcp_blk_drv_data blktrc;
1965         int ticks = req->adapter->timer_ticks;
1966
1967         lat_in = &req->qtcb->prefix.prot_status_qual.latency_info;
1968
1969         blktrc.flags = 0;
1970         blktrc.magic = ZFCP_BLK_DRV_DATA_MAGIC;
1971         if (req->status & ZFCP_STATUS_FSFREQ_ERROR)
1972                 blktrc.flags |= ZFCP_BLK_REQ_ERROR;
1973         blktrc.inb_usage = 0;
1974         blktrc.outb_usage = req->qdio_req.qdio_outb_usage;
1975
1976         if (req->adapter->adapter_features & FSF_FEATURE_MEASUREMENT_DATA &&
1977             !(req->status & ZFCP_STATUS_FSFREQ_ERROR)) {
1978                 zfcp_sdev = sdev_to_zfcp(scsi->device);
1979                 blktrc.flags |= ZFCP_BLK_LAT_VALID;
1980                 blktrc.channel_lat = lat_in->channel_lat * ticks;
1981                 blktrc.fabric_lat = lat_in->fabric_lat * ticks;
1982
1983                 switch (req->qtcb->bottom.io.data_direction) {
1984                 case FSF_DATADIR_DIF_READ_STRIP:
1985                 case FSF_DATADIR_DIF_READ_CONVERT:
1986                 case FSF_DATADIR_READ:
1987                         lat = &zfcp_sdev->latencies.read;
1988                         break;
1989                 case FSF_DATADIR_DIF_WRITE_INSERT:
1990                 case FSF_DATADIR_DIF_WRITE_CONVERT:
1991                 case FSF_DATADIR_WRITE:
1992                         lat = &zfcp_sdev->latencies.write;
1993                         break;
1994                 case FSF_DATADIR_CMND:
1995                         lat = &zfcp_sdev->latencies.cmd;
1996                         break;
1997                 }
1998
1999                 if (lat) {
2000                         spin_lock(&zfcp_sdev->latencies.lock);
2001                         zfcp_fsf_update_lat(&lat->channel, lat_in->channel_lat);
2002                         zfcp_fsf_update_lat(&lat->fabric, lat_in->fabric_lat);
2003                         lat->counter++;
2004                         spin_unlock(&zfcp_sdev->latencies.lock);
2005                 }
2006         }
2007
2008         blk_add_driver_data(scsi->request->q, scsi->request, &blktrc,
2009                             sizeof(blktrc));
2010 }
2011
2012 static void zfcp_fsf_fcp_handler_common(struct zfcp_fsf_req *req)
2013 {
2014         struct scsi_cmnd *scmnd = req->data;
2015         struct scsi_device *sdev = scmnd->device;
2016         struct zfcp_scsi_dev *zfcp_sdev;
2017         struct fsf_qtcb_header *header = &req->qtcb->header;
2018
2019         if (unlikely(req->status & ZFCP_STATUS_FSFREQ_ERROR))
2020                 return;
2021
2022         zfcp_sdev = sdev_to_zfcp(sdev);
2023
2024         switch (header->fsf_status) {
2025         case FSF_HANDLE_MISMATCH:
2026         case FSF_PORT_HANDLE_NOT_VALID:
2027                 zfcp_erp_adapter_reopen(zfcp_sdev->port->adapter, 0, "fssfch1");
2028                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2029                 break;
2030         case FSF_FCPLUN_NOT_VALID:
2031         case FSF_LUN_HANDLE_NOT_VALID:
2032                 zfcp_erp_port_reopen(zfcp_sdev->port, 0, "fssfch2");
2033                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2034                 break;
2035         case FSF_SERVICE_CLASS_NOT_SUPPORTED:
2036                 zfcp_fsf_class_not_supp(req);
2037                 break;
2038         case FSF_ACCESS_DENIED:
2039                 zfcp_cfdc_lun_denied(sdev, &header->fsf_status_qual);
2040                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2041                 break;
2042         case FSF_DIRECTION_INDICATOR_NOT_VALID:
2043                 dev_err(&req->adapter->ccw_device->dev,
2044                         "Incorrect direction %d, LUN 0x%016Lx on port "
2045                         "0x%016Lx closed\n",
2046                         req->qtcb->bottom.io.data_direction,
2047                         (unsigned long long)zfcp_scsi_dev_lun(sdev),
2048                         (unsigned long long)zfcp_sdev->port->wwpn);
2049                 zfcp_erp_adapter_shutdown(zfcp_sdev->port->adapter, 0,
2050                                           "fssfch3");
2051                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2052                 break;
2053         case FSF_CMND_LENGTH_NOT_VALID:
2054                 dev_err(&req->adapter->ccw_device->dev,
2055                         "Incorrect CDB length %d, LUN 0x%016Lx on "
2056                         "port 0x%016Lx closed\n",
2057                         req->qtcb->bottom.io.fcp_cmnd_length,
2058                         (unsigned long long)zfcp_scsi_dev_lun(sdev),
2059                         (unsigned long long)zfcp_sdev->port->wwpn);
2060                 zfcp_erp_adapter_shutdown(zfcp_sdev->port->adapter, 0,
2061                                           "fssfch4");
2062                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2063                 break;
2064         case FSF_PORT_BOXED:
2065                 zfcp_erp_set_port_status(zfcp_sdev->port,
2066                                          ZFCP_STATUS_COMMON_ACCESS_BOXED);
2067                 zfcp_erp_port_reopen(zfcp_sdev->port,
2068                                      ZFCP_STATUS_COMMON_ERP_FAILED, "fssfch5");
2069                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2070                 break;
2071         case FSF_LUN_BOXED:
2072                 zfcp_erp_set_lun_status(sdev, ZFCP_STATUS_COMMON_ACCESS_BOXED);
2073                 zfcp_erp_lun_reopen(sdev, ZFCP_STATUS_COMMON_ERP_FAILED,
2074                                     "fssfch6");
2075                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2076                 break;
2077         case FSF_ADAPTER_STATUS_AVAILABLE:
2078                 if (header->fsf_status_qual.word[0] ==
2079                     FSF_SQ_INVOKE_LINK_TEST_PROCEDURE)
2080                         zfcp_fc_test_link(zfcp_sdev->port);
2081                 req->status |= ZFCP_STATUS_FSFREQ_ERROR;
2082                 break;
2083         }
2084 }
2085
2086 static void zfcp_fsf_fcp_cmnd_handler(struct zfcp_fsf_req *req)
2087 {
2088         struct scsi_cmnd *scpnt;
2089         struct fcp_resp_with_ext *fcp_rsp;
2090         unsigned long flags;
2091
2092         read_lock_irqsave(&req->adapter->abort_lock, flags);
2093
2094         scpnt = req->data;
2095         if (unlikely(!scpnt)) {
2096                 read_unlock_irqrestore(&req->adapter->abort_lock, flags);
2097                 return;
2098         }
2099
2100         zfcp_fsf_fcp_handler_common(req);
2101
2102         if (unlikely(req->status & ZFCP_STATUS_FSFREQ_ERROR)) {
2103                 set_host_byte(scpnt, DID_TRANSPORT_DISRUPTED);
2104                 goto skip_fsfstatus;
2105         }
2106
2107         switch (req->qtcb->header.fsf_status) {
2108         case FSF_INCONSISTENT_PROT_DATA:
2109         case FSF_INVALID_PROT_PARM:
2110                 set_host_byte(scpnt, DID_ERROR);
2111                 goto skip_fsfstatus;
2112         case FSF_BLOCK_GUARD_CHECK_FAILURE:
2113                 zfcp_scsi_dif_sense_error(scpnt, 0x1);
2114                 goto skip_fsfstatus;
2115         case FSF_APP_TAG_CHECK_FAILURE:
2116                 zfcp_scsi_dif_sense_error(scpnt, 0x2);
2117                 goto skip_fsfstatus;
2118         case FSF_REF_TAG_CHECK_FAILURE:
2119                 zfcp_scsi_dif_sense_error(scpnt, 0x3);
2120                 goto skip_fsfstatus;
2121         }
2122         fcp_rsp = (struct fcp_resp_with_ext *) &req->qtcb->bottom.io.fcp_rsp;
2123         zfcp_fc_eval_fcp_rsp(fcp_rsp, scpnt);
2124
2125 skip_fsfstatus:
2126         zfcp_fsf_req_trace(req, scpnt);
2127         zfcp_dbf_scsi_result(scpnt, req);
2128
2129         scpnt->host_scribble = NULL;
2130         (scpnt->scsi_done) (scpnt);
2131         /*
2132          * We must hold this lock until scsi_done has been called.
2133          * Otherwise we may call scsi_done after abort regarding this
2134          * command has completed.
2135          * Note: scsi_done must not block!
2136          */
2137         read_unlock_irqrestore(&req->adapter->abort_lock, flags);
2138 }
2139
2140 static int zfcp_fsf_set_data_dir(struct scsi_cmnd *scsi_cmnd, u32 *data_dir)
2141 {
2142         switch (scsi_get_prot_op(scsi_cmnd)) {
2143         case SCSI_PROT_NORMAL:
2144                 switch (scsi_cmnd->sc_data_direction) {
2145                 case DMA_NONE:
2146                         *data_dir = FSF_DATADIR_CMND;
2147                         break;
2148                 case DMA_FROM_DEVICE:
2149                         *data_dir = FSF_DATADIR_READ;
2150                         break;
2151                 case DMA_TO_DEVICE:
2152                         *data_dir = FSF_DATADIR_WRITE;
2153                         break;
2154                 case DMA_BIDIRECTIONAL:
2155                         return -EINVAL;
2156                 }
2157                 break;
2158
2159         case SCSI_PROT_READ_STRIP:
2160                 *data_dir = FSF_DATADIR_DIF_READ_STRIP;
2161                 break;
2162         case SCSI_PROT_WRITE_INSERT:
2163                 *data_dir = FSF_DATADIR_DIF_WRITE_INSERT;
2164                 break;
2165         case SCSI_PROT_READ_PASS:
2166                 *data_dir = FSF_DATADIR_DIF_READ_CONVERT;
2167                 break;
2168         case SCSI_PROT_WRITE_PASS:
2169                 *data_dir = FSF_DATADIR_DIF_WRITE_CONVERT;
2170                 break;
2171         default:
2172                 return -EINVAL;
2173         }
2174
2175         return 0;
2176 }
2177
2178 /**
2179  * zfcp_fsf_fcp_cmnd - initiate an FCP command (for a SCSI command)
2180  * @scsi_cmnd: scsi command to be sent
2181  */
2182 int zfcp_fsf_fcp_cmnd(struct scsi_cmnd *scsi_cmnd)
2183 {
2184         struct zfcp_fsf_req *req;
2185         struct fcp_cmnd *fcp_cmnd;
2186         u8 sbtype = SBAL_SFLAGS0_TYPE_READ;
2187         int retval = -EIO;
2188         struct scsi_device *sdev = scsi_cmnd->device;
2189         struct zfcp_scsi_dev *zfcp_sdev = sdev_to_zfcp(sdev);
2190         struct zfcp_adapter *adapter = zfcp_sdev->port->adapter;
2191         struct zfcp_qdio *qdio = adapter->qdio;
2192         struct fsf_qtcb_bottom_io *io;
2193         unsigned long flags;
2194
2195         if (unlikely(!(atomic_read(&zfcp_sdev->status) &
2196                        ZFCP_STATUS_COMMON_UNBLOCKED)))
2197                 return -EBUSY;
2198
2199         spin_lock_irqsave(&qdio->req_q_lock, flags);
2200         if (atomic_read(&qdio->req_q_free) <= 0) {
2201                 atomic_inc(&qdio->req_q_full);
2202                 goto out;
2203         }
2204
2205         if (scsi_cmnd->sc_data_direction == DMA_TO_DEVICE)
2206                 sbtype = SBAL_SFLAGS0_TYPE_WRITE;
2207
2208         req = zfcp_fsf_req_create(qdio, FSF_QTCB_FCP_CMND,
2209                                   sbtype, adapter->pool.scsi_req);
2210
2211         if (IS_ERR(req)) {
2212                 retval = PTR_ERR(req);
2213                 goto out;
2214         }
2215
2216         scsi_cmnd->host_scribble = (unsigned char *) req->req_id;
2217
2218         io = &req->qtcb->bottom.io;
2219         req->status |= ZFCP_STATUS_FSFREQ_CLEANUP;
2220         req->data = scsi_cmnd;
2221         req->handler = zfcp_fsf_fcp_cmnd_handler;
2222         req->qtcb->header.lun_handle = zfcp_sdev->lun_handle;
2223         req->qtcb->header.port_handle = zfcp_sdev->port->handle;
2224         io->service_class = FSF_CLASS_3;
2225         io->fcp_cmnd_length = FCP_CMND_LEN;
2226
2227         if (scsi_get_prot_op(scsi_cmnd) != SCSI_PROT_NORMAL) {
2228                 io->data_block_length = scsi_cmnd->device->sector_size;
2229                 io->ref_tag_value = scsi_get_lba(scsi_cmnd) & 0xFFFFFFFF;
2230         }
2231
2232         if (zfcp_fsf_set_data_dir(scsi_cmnd, &io->data_direction))
2233                 goto failed_scsi_cmnd;
2234
2235         fcp_cmnd = (struct fcp_cmnd *) &req->qtcb->bottom.io.fcp_cmnd;
2236         zfcp_fc_scsi_to_fcp(fcp_cmnd, scsi_cmnd, 0);
2237
2238         if (scsi_prot_sg_count(scsi_cmnd)) {
2239                 zfcp_qdio_set_data_div(qdio, &req->qdio_req,
2240                                        scsi_prot_sg_count(scsi_cmnd));
2241                 retval = zfcp_qdio_sbals_from_sg(qdio, &req->qdio_req,
2242                                                  scsi_prot_sglist(scsi_cmnd));
2243                 if (retval)
2244                         goto failed_scsi_cmnd;
2245                 io->prot_data_length = zfcp_qdio_real_bytes(
2246                                                 scsi_prot_sglist(scsi_cmnd));
2247         }
2248
2249         retval = zfcp_qdio_sbals_from_sg(qdio, &req->qdio_req,
2250                                          scsi_sglist(scsi_cmnd));
2251         if (unlikely(retval))
2252                 goto failed_scsi_cmnd;
2253
2254         zfcp_qdio_set_sbale_last(adapter->qdio, &req->qdio_req);
2255         if (zfcp_adapter_multi_buffer_active(adapter))
2256                 zfcp_qdio_set_scount(qdio, &req->qdio_req);
2257
2258         retval = zfcp_fsf_req_send(req);
2259         if (unlikely(retval))
2260                 goto failed_scsi_cmnd;
2261
2262         goto out;
2263
2264 failed_scsi_cmnd:
2265         zfcp_fsf_req_free(req);
2266         scsi_cmnd->host_scribble = NULL;
2267 out:
2268         spin_unlock_irqrestore(&qdio->req_q_lock, flags);
2269         return retval;
2270 }
2271
2272 static void zfcp_fsf_fcp_task_mgmt_handler(struct zfcp_fsf_req *req)
2273 {
2274         struct fcp_resp_with_ext *fcp_rsp;
2275         struct fcp_resp_rsp_info *rsp_info;
2276
2277         zfcp_fsf_fcp_handler_common(req);
2278
2279         fcp_rsp = (struct fcp_resp_with_ext *) &req->qtcb->bottom.io.fcp_rsp;
2280         rsp_info = (struct fcp_resp_rsp_info *) &fcp_rsp[1];
2281
2282         if ((rsp_info->rsp_code != FCP_TMF_CMPL) ||
2283              (req->status & ZFCP_STATUS_FSFREQ_ERROR))
2284                 req->status |= ZFCP_STATUS_FSFREQ_TMFUNCFAILED;
2285 }
2286
2287 /**
2288  * zfcp_fsf_fcp_task_mgmt - send SCSI task management command
2289  * @scmnd: SCSI command to send the task management command for
2290  * @tm_flags: unsigned byte for task management flags
2291  * Returns: on success pointer to struct fsf_req, NULL otherwise
2292  */
2293 struct zfcp_fsf_req *zfcp_fsf_fcp_task_mgmt(struct scsi_cmnd *scmnd,
2294                                             u8 tm_flags)
2295 {
2296         struct zfcp_fsf_req *req = NULL;
2297         struct fcp_cmnd *fcp_cmnd;
2298         struct zfcp_scsi_dev *zfcp_sdev = sdev_to_zfcp(scmnd->device);
2299         struct zfcp_qdio *qdio = zfcp_sdev->port->adapter->qdio;
2300
2301         if (unlikely(!(atomic_read(&zfcp_sdev->status) &
2302                        ZFCP_STATUS_COMMON_UNBLOCKED)))
2303                 return NULL;
2304
2305         spin_lock_irq(&qdio->req_q_lock);
2306         if (zfcp_qdio_sbal_get(qdio))
2307                 goto out;
2308
2309         req = zfcp_fsf_req_create(qdio, FSF_QTCB_FCP_CMND,
2310                                   SBAL_SFLAGS0_TYPE_WRITE,
2311                                   qdio->adapter->pool.scsi_req);
2312
2313         if (IS_ERR(req)) {
2314                 req = NULL;
2315                 goto out;
2316         }
2317
2318         req->data = scmnd;
2319         req->handler = zfcp_fsf_fcp_task_mgmt_handler;
2320         req->qtcb->header.lun_handle = zfcp_sdev->lun_handle;
2321         req->qtcb->header.port_handle = zfcp_sdev->port->handle;
2322         req->qtcb->bottom.io.data_direction = FSF_DATADIR_CMND;
2323         req->qtcb->bottom.io.service_class = FSF_CLASS_3;
2324         req->qtcb->bottom.io.fcp_cmnd_length = FCP_CMND_LEN;
2325
2326         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
2327
2328         fcp_cmnd = (struct fcp_cmnd *) &req->qtcb->bottom.io.fcp_cmnd;
2329         zfcp_fc_scsi_to_fcp(fcp_cmnd, scmnd, tm_flags);
2330
2331         zfcp_fsf_start_timer(req, ZFCP_SCSI_ER_TIMEOUT);
2332         if (!zfcp_fsf_req_send(req))
2333                 goto out;
2334
2335         zfcp_fsf_req_free(req);
2336         req = NULL;
2337 out:
2338         spin_unlock_irq(&qdio->req_q_lock);
2339         return req;
2340 }
2341
2342 static void zfcp_fsf_control_file_handler(struct zfcp_fsf_req *req)
2343 {
2344 }
2345
2346 /**
2347  * zfcp_fsf_control_file - control file upload/download
2348  * @adapter: pointer to struct zfcp_adapter
2349  * @fsf_cfdc: pointer to struct zfcp_fsf_cfdc
2350  * Returns: on success pointer to struct zfcp_fsf_req, NULL otherwise
2351  */
2352 struct zfcp_fsf_req *zfcp_fsf_control_file(struct zfcp_adapter *adapter,
2353                                            struct zfcp_fsf_cfdc *fsf_cfdc)
2354 {
2355         struct zfcp_qdio *qdio = adapter->qdio;
2356         struct zfcp_fsf_req *req = NULL;
2357         struct fsf_qtcb_bottom_support *bottom;
2358         int retval = -EIO;
2359         u8 direction;
2360
2361         if (!(adapter->adapter_features & FSF_FEATURE_CFDC))
2362                 return ERR_PTR(-EOPNOTSUPP);
2363
2364         switch (fsf_cfdc->command) {
2365         case FSF_QTCB_DOWNLOAD_CONTROL_FILE:
2366                 direction = SBAL_SFLAGS0_TYPE_WRITE;
2367                 break;
2368         case FSF_QTCB_UPLOAD_CONTROL_FILE:
2369                 direction = SBAL_SFLAGS0_TYPE_READ;
2370                 break;
2371         default:
2372                 return ERR_PTR(-EINVAL);
2373         }
2374
2375         spin_lock_irq(&qdio->req_q_lock);
2376         if (zfcp_qdio_sbal_get(qdio))
2377                 goto out;
2378
2379         req = zfcp_fsf_req_create(qdio, fsf_cfdc->command, direction, NULL);
2380         if (IS_ERR(req)) {
2381                 retval = -EPERM;
2382                 goto out;
2383         }
2384
2385         req->handler = zfcp_fsf_control_file_handler;
2386
2387         bottom = &req->qtcb->bottom.support;
2388         bottom->operation_subtype = FSF_CFDC_OPERATION_SUBTYPE;
2389         bottom->option = fsf_cfdc->option;
2390
2391         retval = zfcp_qdio_sbals_from_sg(qdio, &req->qdio_req, fsf_cfdc->sg);
2392
2393         if (retval ||
2394                 (zfcp_qdio_real_bytes(fsf_cfdc->sg) != ZFCP_CFDC_MAX_SIZE)) {
2395                 zfcp_fsf_req_free(req);
2396                 retval = -EIO;
2397                 goto out;
2398         }
2399         zfcp_qdio_set_sbale_last(qdio, &req->qdio_req);
2400         if (zfcp_adapter_multi_buffer_active(adapter))
2401                 zfcp_qdio_set_scount(qdio, &req->qdio_req);
2402
2403         zfcp_fsf_start_timer(req, ZFCP_FSF_REQUEST_TIMEOUT);
2404         retval = zfcp_fsf_req_send(req);
2405 out:
2406         spin_unlock_irq(&qdio->req_q_lock);
2407
2408         if (!retval) {
2409                 wait_for_completion(&req->completion);
2410                 return req;
2411         }
2412         return ERR_PTR(retval);
2413 }
2414
2415 /**
2416  * zfcp_fsf_reqid_check - validate req_id contained in SBAL returned by QDIO
2417  * @adapter: pointer to struct zfcp_adapter
2418  * @sbal_idx: response queue index of SBAL to be processed
2419  */
2420 void zfcp_fsf_reqid_check(struct zfcp_qdio *qdio, int sbal_idx)
2421 {
2422         struct zfcp_adapter *adapter = qdio->adapter;
2423         struct qdio_buffer *sbal = qdio->res_q[sbal_idx];
2424         struct qdio_buffer_element *sbale;
2425         struct zfcp_fsf_req *fsf_req;
2426         unsigned long req_id;
2427         int idx;
2428
2429         for (idx = 0; idx < QDIO_MAX_ELEMENTS_PER_BUFFER; idx++) {
2430
2431                 sbale = &sbal->element[idx];
2432                 req_id = (unsigned long) sbale->addr;
2433                 fsf_req = zfcp_reqlist_find_rm(adapter->req_list, req_id);
2434
2435                 if (!fsf_req) {
2436                         /*
2437                          * Unknown request means that we have potentially memory
2438                          * corruption and must stop the machine immediately.
2439                          */
2440                         zfcp_qdio_siosl(adapter);
2441                         panic("error: unknown req_id (%lx) on adapter %s.\n",
2442                               req_id, dev_name(&adapter->ccw_device->dev));
2443                 }
2444
2445                 fsf_req->qdio_req.sbal_response = sbal_idx;
2446                 zfcp_fsf_req_complete(fsf_req);
2447
2448                 if (likely(sbale->eflags & SBAL_EFLAGS_LAST_ENTRY))
2449                         break;
2450         }
2451 }
2452
2453 struct zfcp_fsf_req *zfcp_fsf_get_req(struct zfcp_qdio *qdio,
2454                                       struct qdio_buffer *sbal)
2455 {
2456         struct qdio_buffer_element *sbale = &sbal->element[0];
2457         u64 req_id = (unsigned long) sbale->addr;
2458
2459         return zfcp_reqlist_find(qdio->adapter->req_list, req_id);
2460 }