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