Merge branch 'linux-next' of git://git.infradead.org/~dedekind/ubi-2.6
[linux-2.6] / drivers / s390 / scsi / zfcp_scsi.c
1 /*
2  * zfcp device driver
3  *
4  * Interface to Linux SCSI midlayer.
5  *
6  * Copyright IBM Corporation 2002, 2008
7  */
8
9 #define KMSG_COMPONENT "zfcp"
10 #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
11
12 #include "zfcp_ext.h"
13 #include <asm/atomic.h>
14
15 /* Find start of Sense Information in FCP response unit*/
16 char *zfcp_get_fcp_sns_info_ptr(struct fcp_rsp_iu *fcp_rsp_iu)
17 {
18         char *fcp_sns_info_ptr;
19
20         fcp_sns_info_ptr = (unsigned char *) &fcp_rsp_iu[1];
21         if (fcp_rsp_iu->validity.bits.fcp_rsp_len_valid)
22                 fcp_sns_info_ptr += fcp_rsp_iu->fcp_rsp_len;
23
24         return fcp_sns_info_ptr;
25 }
26
27 static void zfcp_scsi_slave_destroy(struct scsi_device *sdpnt)
28 {
29         struct zfcp_unit *unit = (struct zfcp_unit *) sdpnt->hostdata;
30         atomic_clear_mask(ZFCP_STATUS_UNIT_REGISTERED, &unit->status);
31         unit->device = NULL;
32         zfcp_erp_unit_failed(unit, 12, NULL);
33         zfcp_unit_put(unit);
34 }
35
36 static int zfcp_scsi_slave_configure(struct scsi_device *sdp)
37 {
38         if (sdp->tagged_supported)
39                 scsi_adjust_queue_depth(sdp, MSG_SIMPLE_TAG, 32);
40         else
41                 scsi_adjust_queue_depth(sdp, 0, 1);
42         return 0;
43 }
44
45 static void zfcp_scsi_command_fail(struct scsi_cmnd *scpnt, int result)
46 {
47         set_host_byte(scpnt, result);
48         if ((scpnt->device != NULL) && (scpnt->device->host != NULL))
49                 zfcp_scsi_dbf_event_result("fail", 4,
50                         (struct zfcp_adapter*) scpnt->device->host->hostdata[0],
51                         scpnt, NULL);
52         /* return directly */
53         scpnt->scsi_done(scpnt);
54 }
55
56 static int zfcp_scsi_queuecommand(struct scsi_cmnd *scpnt,
57                                   void (*done) (struct scsi_cmnd *))
58 {
59         struct zfcp_unit *unit;
60         struct zfcp_adapter *adapter;
61         int    status;
62         int    ret;
63
64         /* reset the status for this request */
65         scpnt->result = 0;
66         scpnt->host_scribble = NULL;
67         scpnt->scsi_done = done;
68
69         /*
70          * figure out adapter and target device
71          * (stored there by zfcp_scsi_slave_alloc)
72          */
73         adapter = (struct zfcp_adapter *) scpnt->device->host->hostdata[0];
74         unit = scpnt->device->hostdata;
75
76         BUG_ON(!adapter || (adapter != unit->port->adapter));
77         BUG_ON(!scpnt->scsi_done);
78
79         if (unlikely(!unit)) {
80                 zfcp_scsi_command_fail(scpnt, DID_NO_CONNECT);
81                 return 0;
82         }
83
84         status = atomic_read(&unit->status);
85         if (unlikely((status & ZFCP_STATUS_COMMON_ERP_FAILED) ||
86                      !(status & ZFCP_STATUS_COMMON_RUNNING))) {
87                 zfcp_scsi_command_fail(scpnt, DID_ERROR);
88                 return 0;;
89         }
90
91         ret = zfcp_fsf_send_fcp_command_task(adapter, unit, scpnt, 0,
92                                              ZFCP_REQ_AUTO_CLEANUP);
93         if (unlikely(ret == -EBUSY))
94                 return SCSI_MLQUEUE_DEVICE_BUSY;
95         else if (unlikely(ret < 0))
96                 return SCSI_MLQUEUE_HOST_BUSY;
97
98         return ret;
99 }
100
101 static struct zfcp_unit *zfcp_unit_lookup(struct zfcp_adapter *adapter,
102                                           int channel, unsigned int id,
103                                           unsigned int lun)
104 {
105         struct zfcp_port *port;
106         struct zfcp_unit *unit;
107         int scsi_lun;
108
109         list_for_each_entry(port, &adapter->port_list_head, list) {
110                 if (!port->rport || (id != port->rport->scsi_target_id))
111                         continue;
112                 list_for_each_entry(unit, &port->unit_list_head, list) {
113                         scsi_lun = scsilun_to_int(
114                                 (struct scsi_lun *)&unit->fcp_lun);
115                         if (lun == scsi_lun)
116                                 return unit;
117                 }
118         }
119
120         return NULL;
121 }
122
123 static int zfcp_scsi_slave_alloc(struct scsi_device *sdp)
124 {
125         struct zfcp_adapter *adapter;
126         struct zfcp_unit *unit;
127         unsigned long flags;
128         int retval = -ENXIO;
129
130         adapter = (struct zfcp_adapter *) sdp->host->hostdata[0];
131         if (!adapter)
132                 goto out;
133
134         read_lock_irqsave(&zfcp_data.config_lock, flags);
135         unit = zfcp_unit_lookup(adapter, sdp->channel, sdp->id, sdp->lun);
136         if (unit &&
137             (atomic_read(&unit->status) & ZFCP_STATUS_UNIT_REGISTERED)) {
138                 sdp->hostdata = unit;
139                 unit->device = sdp;
140                 zfcp_unit_get(unit);
141                 retval = 0;
142         }
143         read_unlock_irqrestore(&zfcp_data.config_lock, flags);
144 out:
145         return retval;
146 }
147
148 static int zfcp_scsi_eh_abort_handler(struct scsi_cmnd *scpnt)
149 {
150         struct Scsi_Host *scsi_host;
151         struct zfcp_adapter *adapter;
152         struct zfcp_unit *unit;
153         struct zfcp_fsf_req *fsf_req;
154         unsigned long flags;
155         unsigned long old_req_id = (unsigned long) scpnt->host_scribble;
156         int retval = SUCCESS;
157
158         scsi_host = scpnt->device->host;
159         adapter = (struct zfcp_adapter *) scsi_host->hostdata[0];
160         unit = scpnt->device->hostdata;
161
162         /* avoid race condition between late normal completion and abort */
163         write_lock_irqsave(&adapter->abort_lock, flags);
164
165         /* Check whether corresponding fsf_req is still pending */
166         spin_lock(&adapter->req_list_lock);
167         fsf_req = zfcp_reqlist_find(adapter, old_req_id);
168         spin_unlock(&adapter->req_list_lock);
169         if (!fsf_req) {
170                 write_unlock_irqrestore(&adapter->abort_lock, flags);
171                 zfcp_scsi_dbf_event_abort("lte1", adapter, scpnt, NULL, 0);
172                 return retval;
173         }
174         fsf_req->data = NULL;
175
176         /* don't access old fsf_req after releasing the abort_lock */
177         write_unlock_irqrestore(&adapter->abort_lock, flags);
178
179         fsf_req = zfcp_fsf_abort_fcp_command(old_req_id, adapter, unit, 0);
180         if (!fsf_req) {
181                 zfcp_scsi_dbf_event_abort("nres", adapter, scpnt, NULL,
182                                           old_req_id);
183                 retval = FAILED;
184                 return retval;
185         }
186
187         __wait_event(fsf_req->completion_wq,
188                      fsf_req->status & ZFCP_STATUS_FSFREQ_COMPLETED);
189
190         if (fsf_req->status & ZFCP_STATUS_FSFREQ_ABORTSUCCEEDED) {
191                 zfcp_scsi_dbf_event_abort("okay", adapter, scpnt, fsf_req, 0);
192         } else if (fsf_req->status & ZFCP_STATUS_FSFREQ_ABORTNOTNEEDED) {
193                 zfcp_scsi_dbf_event_abort("lte2", adapter, scpnt, fsf_req, 0);
194         } else {
195                 zfcp_scsi_dbf_event_abort("fail", adapter, scpnt, fsf_req, 0);
196                 retval = FAILED;
197         }
198         zfcp_fsf_req_free(fsf_req);
199
200         return retval;
201 }
202
203 static int zfcp_task_mgmt_function(struct zfcp_unit *unit, u8 tm_flags,
204                                          struct scsi_cmnd *scpnt)
205 {
206         struct zfcp_adapter *adapter = unit->port->adapter;
207         struct zfcp_fsf_req *fsf_req;
208         int retval = SUCCESS;
209
210         /* issue task management function */
211         fsf_req = zfcp_fsf_send_fcp_ctm(adapter, unit, tm_flags, 0);
212         if (!fsf_req) {
213                 zfcp_scsi_dbf_event_devreset("nres", tm_flags, unit, scpnt);
214                 return FAILED;
215         }
216
217         __wait_event(fsf_req->completion_wq,
218                      fsf_req->status & ZFCP_STATUS_FSFREQ_COMPLETED);
219
220         /*
221          * check completion status of task management function
222          */
223         if (fsf_req->status & ZFCP_STATUS_FSFREQ_TMFUNCFAILED) {
224                 zfcp_scsi_dbf_event_devreset("fail", tm_flags, unit, scpnt);
225                 retval = FAILED;
226         } else if (fsf_req->status & ZFCP_STATUS_FSFREQ_TMFUNCNOTSUPP) {
227                 zfcp_scsi_dbf_event_devreset("nsup", tm_flags, unit, scpnt);
228                 retval = FAILED;
229         } else
230                 zfcp_scsi_dbf_event_devreset("okay", tm_flags, unit, scpnt);
231
232         zfcp_fsf_req_free(fsf_req);
233
234         return retval;
235 }
236
237 static int zfcp_scsi_eh_device_reset_handler(struct scsi_cmnd *scpnt)
238 {
239         struct zfcp_unit *unit = scpnt->device->hostdata;
240
241         if (!unit) {
242                 WARN_ON(1);
243                 return SUCCESS;
244         }
245         return zfcp_task_mgmt_function(unit, FCP_LOGICAL_UNIT_RESET, scpnt);
246 }
247
248 static int zfcp_scsi_eh_target_reset_handler(struct scsi_cmnd *scpnt)
249 {
250         struct zfcp_unit *unit = scpnt->device->hostdata;
251
252         if (!unit) {
253                 WARN_ON(1);
254                 return SUCCESS;
255         }
256         return zfcp_task_mgmt_function(unit, FCP_TARGET_RESET, scpnt);
257 }
258
259 static int zfcp_scsi_eh_host_reset_handler(struct scsi_cmnd *scpnt)
260 {
261         struct zfcp_unit *unit;
262         struct zfcp_adapter *adapter;
263
264         unit = scpnt->device->hostdata;
265         adapter = unit->port->adapter;
266         zfcp_erp_adapter_reopen(adapter, 0, 141, scpnt);
267         zfcp_erp_wait(adapter);
268
269         return SUCCESS;
270 }
271
272 int zfcp_adapter_scsi_register(struct zfcp_adapter *adapter)
273 {
274         struct ccw_dev_id dev_id;
275
276         if (adapter->scsi_host)
277                 return 0;
278
279         ccw_device_get_id(adapter->ccw_device, &dev_id);
280         /* register adapter as SCSI host with mid layer of SCSI stack */
281         adapter->scsi_host = scsi_host_alloc(&zfcp_data.scsi_host_template,
282                                              sizeof (struct zfcp_adapter *));
283         if (!adapter->scsi_host) {
284                 dev_err(&adapter->ccw_device->dev,
285                         "Registering the FCP device with the "
286                         "SCSI stack failed\n");
287                 return -EIO;
288         }
289
290         /* tell the SCSI stack some characteristics of this adapter */
291         adapter->scsi_host->max_id = 1;
292         adapter->scsi_host->max_lun = 1;
293         adapter->scsi_host->max_channel = 0;
294         adapter->scsi_host->unique_id = dev_id.devno;
295         adapter->scsi_host->max_cmd_len = 255;
296         adapter->scsi_host->transportt = zfcp_data.scsi_transport_template;
297
298         adapter->scsi_host->hostdata[0] = (unsigned long) adapter;
299
300         if (scsi_add_host(adapter->scsi_host, &adapter->ccw_device->dev)) {
301                 scsi_host_put(adapter->scsi_host);
302                 return -EIO;
303         }
304
305         return 0;
306 }
307
308 void zfcp_adapter_scsi_unregister(struct zfcp_adapter *adapter)
309 {
310         struct Scsi_Host *shost;
311         struct zfcp_port *port;
312
313         shost = adapter->scsi_host;
314         if (!shost)
315                 return;
316
317         read_lock_irq(&zfcp_data.config_lock);
318         list_for_each_entry(port, &adapter->port_list_head, list)
319                 if (port->rport)
320                         port->rport = NULL;
321
322         read_unlock_irq(&zfcp_data.config_lock);
323         fc_remove_host(shost);
324         scsi_remove_host(shost);
325         scsi_host_put(shost);
326         adapter->scsi_host = NULL;
327
328         return;
329 }
330
331 static struct fc_host_statistics*
332 zfcp_init_fc_host_stats(struct zfcp_adapter *adapter)
333 {
334         struct fc_host_statistics *fc_stats;
335
336         if (!adapter->fc_stats) {
337                 fc_stats = kmalloc(sizeof(*fc_stats), GFP_KERNEL);
338                 if (!fc_stats)
339                         return NULL;
340                 adapter->fc_stats = fc_stats; /* freed in adater_dequeue */
341         }
342         memset(adapter->fc_stats, 0, sizeof(*adapter->fc_stats));
343         return adapter->fc_stats;
344 }
345
346 static void zfcp_adjust_fc_host_stats(struct fc_host_statistics *fc_stats,
347                                       struct fsf_qtcb_bottom_port *data,
348                                       struct fsf_qtcb_bottom_port *old)
349 {
350         fc_stats->seconds_since_last_reset =
351                 data->seconds_since_last_reset - old->seconds_since_last_reset;
352         fc_stats->tx_frames = data->tx_frames - old->tx_frames;
353         fc_stats->tx_words = data->tx_words - old->tx_words;
354         fc_stats->rx_frames = data->rx_frames - old->rx_frames;
355         fc_stats->rx_words = data->rx_words - old->rx_words;
356         fc_stats->lip_count = data->lip - old->lip;
357         fc_stats->nos_count = data->nos - old->nos;
358         fc_stats->error_frames = data->error_frames - old->error_frames;
359         fc_stats->dumped_frames = data->dumped_frames - old->dumped_frames;
360         fc_stats->link_failure_count = data->link_failure - old->link_failure;
361         fc_stats->loss_of_sync_count = data->loss_of_sync - old->loss_of_sync;
362         fc_stats->loss_of_signal_count =
363                 data->loss_of_signal - old->loss_of_signal;
364         fc_stats->prim_seq_protocol_err_count =
365                 data->psp_error_counts - old->psp_error_counts;
366         fc_stats->invalid_tx_word_count =
367                 data->invalid_tx_words - old->invalid_tx_words;
368         fc_stats->invalid_crc_count = data->invalid_crcs - old->invalid_crcs;
369         fc_stats->fcp_input_requests =
370                 data->input_requests - old->input_requests;
371         fc_stats->fcp_output_requests =
372                 data->output_requests - old->output_requests;
373         fc_stats->fcp_control_requests =
374                 data->control_requests - old->control_requests;
375         fc_stats->fcp_input_megabytes = data->input_mb - old->input_mb;
376         fc_stats->fcp_output_megabytes = data->output_mb - old->output_mb;
377 }
378
379 static void zfcp_set_fc_host_stats(struct fc_host_statistics *fc_stats,
380                                    struct fsf_qtcb_bottom_port *data)
381 {
382         fc_stats->seconds_since_last_reset = data->seconds_since_last_reset;
383         fc_stats->tx_frames = data->tx_frames;
384         fc_stats->tx_words = data->tx_words;
385         fc_stats->rx_frames = data->rx_frames;
386         fc_stats->rx_words = data->rx_words;
387         fc_stats->lip_count = data->lip;
388         fc_stats->nos_count = data->nos;
389         fc_stats->error_frames = data->error_frames;
390         fc_stats->dumped_frames = data->dumped_frames;
391         fc_stats->link_failure_count = data->link_failure;
392         fc_stats->loss_of_sync_count = data->loss_of_sync;
393         fc_stats->loss_of_signal_count = data->loss_of_signal;
394         fc_stats->prim_seq_protocol_err_count = data->psp_error_counts;
395         fc_stats->invalid_tx_word_count = data->invalid_tx_words;
396         fc_stats->invalid_crc_count = data->invalid_crcs;
397         fc_stats->fcp_input_requests = data->input_requests;
398         fc_stats->fcp_output_requests = data->output_requests;
399         fc_stats->fcp_control_requests = data->control_requests;
400         fc_stats->fcp_input_megabytes = data->input_mb;
401         fc_stats->fcp_output_megabytes = data->output_mb;
402 }
403
404 static struct fc_host_statistics *zfcp_get_fc_host_stats(struct Scsi_Host *host)
405 {
406         struct zfcp_adapter *adapter;
407         struct fc_host_statistics *fc_stats;
408         struct fsf_qtcb_bottom_port *data;
409         int ret;
410
411         adapter = (struct zfcp_adapter *)host->hostdata[0];
412         fc_stats = zfcp_init_fc_host_stats(adapter);
413         if (!fc_stats)
414                 return NULL;
415
416         data = kzalloc(sizeof(*data), GFP_KERNEL);
417         if (!data)
418                 return NULL;
419
420         ret = zfcp_fsf_exchange_port_data_sync(adapter, data);
421         if (ret) {
422                 kfree(data);
423                 return NULL;
424         }
425
426         if (adapter->stats_reset &&
427             ((jiffies/HZ - adapter->stats_reset) <
428              data->seconds_since_last_reset))
429                 zfcp_adjust_fc_host_stats(fc_stats, data,
430                                           adapter->stats_reset_data);
431         else
432                 zfcp_set_fc_host_stats(fc_stats, data);
433
434         kfree(data);
435         return fc_stats;
436 }
437
438 static void zfcp_reset_fc_host_stats(struct Scsi_Host *shost)
439 {
440         struct zfcp_adapter *adapter;
441         struct fsf_qtcb_bottom_port *data;
442         int ret;
443
444         adapter = (struct zfcp_adapter *)shost->hostdata[0];
445         data = kzalloc(sizeof(*data), GFP_KERNEL);
446         if (!data)
447                 return;
448
449         ret = zfcp_fsf_exchange_port_data_sync(adapter, data);
450         if (ret)
451                 kfree(data);
452         else {
453                 adapter->stats_reset = jiffies/HZ;
454                 kfree(adapter->stats_reset_data);
455                 adapter->stats_reset_data = data; /* finally freed in
456                                                      adapter_dequeue */
457         }
458 }
459
460 static void zfcp_get_host_port_state(struct Scsi_Host *shost)
461 {
462         struct zfcp_adapter *adapter =
463                 (struct zfcp_adapter *)shost->hostdata[0];
464         int status = atomic_read(&adapter->status);
465
466         if ((status & ZFCP_STATUS_COMMON_RUNNING) &&
467             !(status & ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED))
468                 fc_host_port_state(shost) = FC_PORTSTATE_ONLINE;
469         else if (status & ZFCP_STATUS_ADAPTER_LINK_UNPLUGGED)
470                 fc_host_port_state(shost) = FC_PORTSTATE_LINKDOWN;
471         else if (status & ZFCP_STATUS_COMMON_ERP_FAILED)
472                 fc_host_port_state(shost) = FC_PORTSTATE_ERROR;
473         else
474                 fc_host_port_state(shost) = FC_PORTSTATE_UNKNOWN;
475 }
476
477 static void zfcp_set_rport_dev_loss_tmo(struct fc_rport *rport, u32 timeout)
478 {
479         rport->dev_loss_tmo = timeout;
480 }
481
482 struct fc_function_template zfcp_transport_functions = {
483         .show_starget_port_id = 1,
484         .show_starget_port_name = 1,
485         .show_starget_node_name = 1,
486         .show_rport_supported_classes = 1,
487         .show_rport_maxframe_size = 1,
488         .show_rport_dev_loss_tmo = 1,
489         .show_host_node_name = 1,
490         .show_host_port_name = 1,
491         .show_host_permanent_port_name = 1,
492         .show_host_supported_classes = 1,
493         .show_host_supported_speeds = 1,
494         .show_host_maxframe_size = 1,
495         .show_host_serial_number = 1,
496         .get_fc_host_stats = zfcp_get_fc_host_stats,
497         .reset_fc_host_stats = zfcp_reset_fc_host_stats,
498         .set_rport_dev_loss_tmo = zfcp_set_rport_dev_loss_tmo,
499         .get_host_port_state = zfcp_get_host_port_state,
500         .show_host_port_state = 1,
501         /* no functions registered for following dynamic attributes but
502            directly set by LLDD */
503         .show_host_port_type = 1,
504         .show_host_speed = 1,
505         .show_host_port_id = 1,
506         .disable_target_scan = 1,
507 };
508
509 struct zfcp_data zfcp_data = {
510         .scsi_host_template = {
511                 .name                    = "zfcp",
512                 .module                  = THIS_MODULE,
513                 .proc_name               = "zfcp",
514                 .slave_alloc             = zfcp_scsi_slave_alloc,
515                 .slave_configure         = zfcp_scsi_slave_configure,
516                 .slave_destroy           = zfcp_scsi_slave_destroy,
517                 .queuecommand            = zfcp_scsi_queuecommand,
518                 .eh_abort_handler        = zfcp_scsi_eh_abort_handler,
519                 .eh_device_reset_handler = zfcp_scsi_eh_device_reset_handler,
520                 .eh_target_reset_handler = zfcp_scsi_eh_target_reset_handler,
521                 .eh_host_reset_handler   = zfcp_scsi_eh_host_reset_handler,
522                 .can_queue               = 4096,
523                 .this_id                 = -1,
524                 .sg_tablesize            = ZFCP_MAX_SBALES_PER_REQ,
525                 .cmd_per_lun             = 1,
526                 .use_clustering          = 1,
527                 .sdev_attrs              = zfcp_sysfs_sdev_attrs,
528                 .max_sectors             = (ZFCP_MAX_SBALES_PER_REQ * 8),
529                 .shost_attrs             = zfcp_sysfs_shost_attrs,
530         },
531 };