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