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