?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
[SCSI] libsas: Delay issuing ABORT TASK TMF until the error handler
[linux-2.6/linux-acpi-2.6/ibm-acpi-2.6.git] / drivers / scsi / libsas / sas_scsi_host.c
blobf867455dd339a98d521823dc56fb4a5f1da8426a
1 /*
2 * Serial Attached SCSI (SAS) class SCSI Host glue.
3 *
4 * Copyright (C) 2005 Adaptec, Inc. All rights reserved.
5 * Copyright (C) 2005 Luben Tuikov <luben_tuikov@adaptec.com>
6 *
7 * This file is licensed under GPLv2.
8 *
9 * This program is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU General Public License as
11 * published by the Free Software Foundation; either version 2 of the
12 * License, or (at your option) any later version.
13 *
14 * This program is distributed in the hope that it will be useful, but
15 * WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * General Public License for more details.
18 *
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
22 * USA
23 *
24 */
25
26 #include "sas_internal.h"
27
28 #include <scsi/scsi_host.h>
29 #include <scsi/scsi_device.h>
30 #include <scsi/scsi_tcq.h>
31 #include <scsi/scsi.h>
32 #include <scsi/scsi_eh.h>
33 #include <scsi/scsi_transport.h>
34 #include <scsi/scsi_transport_sas.h>
35 #include "../scsi_sas_internal.h"
36 #include "../scsi_transport_api.h"
37
38 #include <linux/err.h>
39 #include <linux/blkdev.h>
40 #include <linux/scatterlist.h>
41
42 /* ---------- SCSI Host glue ---------- */
43
44 #define TO_SAS_TASK(_scsi_cmd) ((void *)(_scsi_cmd)->host_scribble)
45 #define ASSIGN_SAS_TASK(_sc, _t) do { (_sc)->host_scribble = (void *) _t; } while (0)
46
47 static void sas_scsi_task_done(struct sas_task *task)
48 {
49 struct task_status_struct *ts = &task->task_status;
50 struct scsi_cmnd *sc = task->uldd_task;
51 struct sas_ha_struct *sas_ha = SHOST_TO_SAS_HA(sc->device->host);
52 unsigned ts_flags = task->task_state_flags;
53 int hs = 0, stat = 0;
54
55 if (unlikely(!sc)) {
56 SAS_DPRINTK("task_done called with non existing SCSI cmnd!\n");
57 list_del_init(&task->list);
58 sas_free_task(task);
59 return;
60 }
61
62 if (ts->resp == SAS_TASK_UNDELIVERED) {
63 /* transport error */
64 hs = DID_NO_CONNECT;
65 } else { /* ts->resp == SAS_TASK_COMPLETE */
66 /* task delivered, what happened afterwards? */
67 switch (ts->stat) {
68 case SAS_DEV_NO_RESPONSE:
69 case SAS_INTERRUPTED:
70 case SAS_PHY_DOWN:
71 case SAS_NAK_R_ERR:
72 case SAS_OPEN_TO:
73 hs = DID_NO_CONNECT;
74 break;
75 case SAS_DATA_UNDERRUN:
76 sc->resid = ts->residual;
77 if (sc->request_bufflen - sc->resid < sc->underflow)
78 hs = DID_ERROR;
79 break;
80 case SAS_DATA_OVERRUN:
81 hs = DID_ERROR;
82 break;
83 case SAS_QUEUE_FULL:
84 hs = DID_SOFT_ERROR; /* retry */
85 break;
86 case SAS_DEVICE_UNKNOWN:
87 hs = DID_BAD_TARGET;
88 break;
89 case SAS_SG_ERR:
90 hs = DID_PARITY;
91 break;
92 case SAS_OPEN_REJECT:
93 if (ts->open_rej_reason == SAS_OREJ_RSVD_RETRY)
94 hs = DID_SOFT_ERROR; /* retry */
95 else
96 hs = DID_ERROR;
97 break;
98 case SAS_PROTO_RESPONSE:
99 SAS_DPRINTK("LLDD:%s sent SAS_PROTO_RESP for an SSP "
100 "task; please report this\n",
101 task->dev->port->ha->sas_ha_name);
102 break;
103 case SAS_ABORTED_TASK:
104 hs = DID_ABORT;
105 break;
106 case SAM_CHECK_COND:
107 memcpy(sc->sense_buffer, ts->buf,
108 max(SCSI_SENSE_BUFFERSIZE, ts->buf_valid_size));
109 stat = SAM_CHECK_COND;
110 break;
111 default:
112 stat = ts->stat;
113 break;
114 }
115 }
116 ASSIGN_SAS_TASK(sc, NULL);
117 sc->result = (hs << 16) | stat;
118 list_del_init(&task->list);
119 sas_free_task(task);
120 /* This is very ugly but this is how SCSI Core works. */
121 if (ts_flags & SAS_TASK_STATE_ABORTED)
122 scsi_eh_finish_cmd(sc, &sas_ha->eh_done_q);
123 else
124 sc->scsi_done(sc);
125 }
126
127 static enum task_attribute sas_scsi_get_task_attr(struct scsi_cmnd *cmd)
128 {
129 enum task_attribute ta = TASK_ATTR_SIMPLE;
130 if (cmd->request && blk_rq_tagged(cmd->request)) {
131 if (cmd->device->ordered_tags &&
132 (cmd->request->cmd_flags & REQ_HARDBARRIER))
133 ta = TASK_ATTR_HOQ;
134 }
135 return ta;
136 }
137
138 static struct sas_task *sas_create_task(struct scsi_cmnd *cmd,
139 struct domain_device *dev,
140 gfp_t gfp_flags)
141 {
142 struct sas_task *task = sas_alloc_task(gfp_flags);
143 struct scsi_lun lun;
144
145 if (!task)
146 return NULL;
147
148 *(u32 *)cmd->sense_buffer = 0;
149 task->uldd_task = cmd;
150 ASSIGN_SAS_TASK(cmd, task);
151
152 task->dev = dev;
153 task->task_proto = task->dev->tproto; /* BUG_ON(!SSP) */
154
155 task->ssp_task.retry_count = 1;
156 int_to_scsilun(cmd->device->lun, &lun);
157 memcpy(task->ssp_task.LUN, &lun.scsi_lun, 8);
158 task->ssp_task.task_attr = sas_scsi_get_task_attr(cmd);
159 memcpy(task->ssp_task.cdb, cmd->cmnd, 16);
160
161 task->scatter = cmd->request_buffer;
162 task->num_scatter = cmd->use_sg;
163 task->total_xfer_len = cmd->request_bufflen;
164 task->data_dir = cmd->sc_data_direction;
165
166 task->task_done = sas_scsi_task_done;
167
168 return task;
169 }
170
171 static int sas_queue_up(struct sas_task *task)
172 {
173 struct sas_ha_struct *sas_ha = task->dev->port->ha;
174 struct scsi_core *core = &sas_ha->core;
175 unsigned long flags;
176 LIST_HEAD(list);
177
178 spin_lock_irqsave(&core->task_queue_lock, flags);
179 if (sas_ha->lldd_queue_size < core->task_queue_size + 1) {
180 spin_unlock_irqrestore(&core->task_queue_lock, flags);
181 return -SAS_QUEUE_FULL;
182 }
183 list_add_tail(&task->list, &core->task_queue);
184 core->task_queue_size += 1;
185 spin_unlock_irqrestore(&core->task_queue_lock, flags);
186 up(&core->queue_thread_sema);
187
188 return 0;
189 }
190
191 /**
192 * sas_queuecommand -- Enqueue a command for processing
193 * @parameters: See SCSI Core documentation
194 *
195 * Note: XXX: Remove the host unlock/lock pair when SCSI Core can
196 * call us without holding an IRQ spinlock...
197 */
198 int sas_queuecommand(struct scsi_cmnd *cmd,
199 void (*scsi_done)(struct scsi_cmnd *))
200 {
201 int res = 0;
202 struct domain_device *dev = cmd_to_domain_dev(cmd);
203 struct Scsi_Host *host = cmd->device->host;
204 struct sas_internal *i = to_sas_internal(host->transportt);
205
206 spin_unlock_irq(host->host_lock);
207
208 {
209 struct sas_ha_struct *sas_ha = dev->port->ha;
210 struct sas_task *task;
211
212 res = -ENOMEM;
213 task = sas_create_task(cmd, dev, GFP_ATOMIC);
214 if (!task)
215 goto out;
216
217 cmd->scsi_done = scsi_done;
218 /* Queue up, Direct Mode or Task Collector Mode. */
219 if (sas_ha->lldd_max_execute_num < 2)
220 res = i->dft->lldd_execute_task(task, 1, GFP_ATOMIC);
221 else
222 res = sas_queue_up(task);
223
224 /* Examine */
225 if (res) {
226 SAS_DPRINTK("lldd_execute_task returned: %d\n", res);
227 ASSIGN_SAS_TASK(cmd, NULL);
228 sas_free_task(task);
229 if (res == -SAS_QUEUE_FULL) {
230 cmd->result = DID_SOFT_ERROR << 16; /* retry */
231 res = 0;
232 scsi_done(cmd);
233 }
234 goto out;
235 }
236 }
237 out:
238 spin_lock_irq(host->host_lock);
239 return res;
240 }
241
242 static void sas_scsi_clear_queue_lu(struct list_head *error_q, struct scsi_cmnd *my_cmd)
243 {
244 struct scsi_cmnd *cmd, *n;
245
246 list_for_each_entry_safe(cmd, n, error_q, eh_entry) {
247 if (cmd == my_cmd)
248 list_del_init(&cmd->eh_entry);
249 }
250 }
251
252 static void sas_scsi_clear_queue_I_T(struct list_head *error_q,
253 struct domain_device *dev)
254 {
255 struct scsi_cmnd *cmd, *n;
256
257 list_for_each_entry_safe(cmd, n, error_q, eh_entry) {
258 struct domain_device *x = cmd_to_domain_dev(cmd);
259
260 if (x == dev)
261 list_del_init(&cmd->eh_entry);
262 }
263 }
264
265 static void sas_scsi_clear_queue_port(struct list_head *error_q,
266 struct asd_sas_port *port)
267 {
268 struct scsi_cmnd *cmd, *n;
269
270 list_for_each_entry_safe(cmd, n, error_q, eh_entry) {
271 struct domain_device *dev = cmd_to_domain_dev(cmd);
272 struct asd_sas_port *x = dev->port;
273
274 if (x == port)
275 list_del_init(&cmd->eh_entry);
276 }
277 }
278
279 enum task_disposition {
280 TASK_IS_DONE,
281 TASK_IS_ABORTED,
282 TASK_IS_AT_LU,
283 TASK_IS_NOT_AT_LU,
284 };
285
286 static enum task_disposition sas_scsi_find_task(struct sas_task *task)
287 {
288 struct sas_ha_struct *ha = task->dev->port->ha;
289 unsigned long flags;
290 int i, res;
291 struct sas_internal *si =
292 to_sas_internal(task->dev->port->ha->core.shost->transportt);
293
294 if (ha->lldd_max_execute_num > 1) {
295 struct scsi_core *core = &ha->core;
296 struct sas_task *t, *n;
297
298 spin_lock_irqsave(&core->task_queue_lock, flags);
299 list_for_each_entry_safe(t, n, &core->task_queue, list) {
300 if (task == t) {
301 list_del_init(&t->list);
302 spin_unlock_irqrestore(&core->task_queue_lock,
303 flags);
304 SAS_DPRINTK("%s: task 0x%p aborted from "
305 "task_queue\n",
306 __FUNCTION__, task);
307 return TASK_IS_ABORTED;
308 }
309 }
310 spin_unlock_irqrestore(&core->task_queue_lock, flags);
311 }
312
313 for (i = 0; i < 5; i++) {
314 SAS_DPRINTK("%s: aborting task 0x%p\n", __FUNCTION__, task);
315 res = si->dft->lldd_abort_task(task);
316
317 spin_lock_irqsave(&task->task_state_lock, flags);
318 if (task->task_state_flags & SAS_TASK_STATE_DONE) {
319 spin_unlock_irqrestore(&task->task_state_lock, flags);
320 SAS_DPRINTK("%s: task 0x%p is done\n", __FUNCTION__,
321 task);
322 return TASK_IS_DONE;
323 }
324 spin_unlock_irqrestore(&task->task_state_lock, flags);
325
326 if (res == TMF_RESP_FUNC_COMPLETE) {
327 SAS_DPRINTK("%s: task 0x%p is aborted\n",
328 __FUNCTION__, task);
329 return TASK_IS_ABORTED;
330 } else if (si->dft->lldd_query_task) {
331 SAS_DPRINTK("%s: querying task 0x%p\n",
332 __FUNCTION__, task);
333 res = si->dft->lldd_query_task(task);
334 if (res == TMF_RESP_FUNC_SUCC) {
335 SAS_DPRINTK("%s: task 0x%p at LU\n",
336 __FUNCTION__, task);
337 return TASK_IS_AT_LU;
338 } else if (res == TMF_RESP_FUNC_COMPLETE) {
339 SAS_DPRINTK("%s: task 0x%p not at LU\n",
340 __FUNCTION__, task);
341 return TASK_IS_NOT_AT_LU;
342 }
343 }
344 }
345 return res;
346 }
347
348 static int sas_recover_lu(struct domain_device *dev, struct scsi_cmnd *cmd)
349 {
350 int res = TMF_RESP_FUNC_FAILED;
351 struct scsi_lun lun;
352 struct sas_internal *i =
353 to_sas_internal(dev->port->ha->core.shost->transportt);
354
355 int_to_scsilun(cmd->device->lun, &lun);
356
357 SAS_DPRINTK("eh: device %llx LUN %x has the task\n",
358 SAS_ADDR(dev->sas_addr),
359 cmd->device->lun);
360
361 if (i->dft->lldd_abort_task_set)
362 res = i->dft->lldd_abort_task_set(dev, lun.scsi_lun);
363
364 if (res == TMF_RESP_FUNC_FAILED) {
365 if (i->dft->lldd_clear_task_set)
366 res = i->dft->lldd_clear_task_set(dev, lun.scsi_lun);
367 }
368
369 if (res == TMF_RESP_FUNC_FAILED) {
370 if (i->dft->lldd_lu_reset)
371 res = i->dft->lldd_lu_reset(dev, lun.scsi_lun);
372 }
373
374 return res;
375 }
376
377 static int sas_recover_I_T(struct domain_device *dev)
378 {
379 int res = TMF_RESP_FUNC_FAILED;
380 struct sas_internal *i =
381 to_sas_internal(dev->port->ha->core.shost->transportt);
382
383 SAS_DPRINTK("I_T nexus reset for dev %016llx\n",
384 SAS_ADDR(dev->sas_addr));
385
386 if (i->dft->lldd_I_T_nexus_reset)
387 res = i->dft->lldd_I_T_nexus_reset(dev);
388
389 return res;
390 }
391
392 static int eh_reset_phy_helper(struct sas_phy *phy)
393 {
394 int tmf_resp;
395
396 tmf_resp = sas_phy_reset(phy, 1);
397 if (tmf_resp)
398 SAS_DPRINTK("Hard reset of phy %d failed 0x%x\n",
399 phy->identify.phy_identifier,
400 tmf_resp);
401
402 return tmf_resp;
403 }
404
405 void sas_scsi_recover_host(struct Scsi_Host *shost)
406 {
407 struct sas_ha_struct *ha = SHOST_TO_SAS_HA(shost);
408 unsigned long flags;
409 LIST_HEAD(error_q);
410 struct scsi_cmnd *cmd, *n;
411 enum task_disposition res = TASK_IS_DONE;
412 int tmf_resp, need_reset;
413 struct sas_internal *i = to_sas_internal(shost->transportt);
414 struct sas_phy *task_sas_phy = NULL;
415
416 spin_lock_irqsave(shost->host_lock, flags);
417 list_splice_init(&shost->eh_cmd_q, &error_q);
418 spin_unlock_irqrestore(shost->host_lock, flags);
419
420 SAS_DPRINTK("Enter %s\n", __FUNCTION__);
421
422 /* All tasks on this list were marked SAS_TASK_STATE_ABORTED
423 * by sas_scsi_timed_out() callback.
424 */
425 Again:
426 SAS_DPRINTK("going over list...\n");
427 list_for_each_entry_safe(cmd, n, &error_q, eh_entry) {
428 struct sas_task *task = TO_SAS_TASK(cmd);
429 list_del_init(&cmd->eh_entry);
430
431 if (!task) {
432 SAS_DPRINTK("%s: taskless cmd?!\n", __FUNCTION__);
433 continue;
434 }
435
436 spin_lock_irqsave(&task->task_state_lock, flags);
437 need_reset = task->task_state_flags & SAS_TASK_NEED_DEV_RESET;
438 if (need_reset)
439 task_sas_phy = task->dev->port->phy;
440 spin_unlock_irqrestore(&task->task_state_lock, flags);
441
442 SAS_DPRINTK("trying to find task 0x%p\n", task);
443 res = sas_scsi_find_task(task);
444
445 cmd->eh_eflags = 0;
446
447 switch (res) {
448 case TASK_IS_DONE:
449 SAS_DPRINTK("%s: task 0x%p is done\n", __FUNCTION__,
450 task);
451 task->task_done(task);
452 if (need_reset)
453 eh_reset_phy_helper(task_sas_phy);
454 continue;
455 case TASK_IS_ABORTED:
456 SAS_DPRINTK("%s: task 0x%p is aborted\n",
457 __FUNCTION__, task);
458 task->task_done(task);
459 if (need_reset)
460 eh_reset_phy_helper(task_sas_phy);
461 continue;
462 case TASK_IS_AT_LU:
463 SAS_DPRINTK("task 0x%p is at LU: lu recover\n", task);
464 tmf_resp = sas_recover_lu(task->dev, cmd);
465 if (tmf_resp == TMF_RESP_FUNC_COMPLETE) {
466 SAS_DPRINTK("dev %016llx LU %x is "
467 "recovered\n",
468 SAS_ADDR(task->dev),
469 cmd->device->lun);
470 task->task_done(task);
471 if (need_reset)
472 eh_reset_phy_helper(task_sas_phy);
473 sas_scsi_clear_queue_lu(&error_q, cmd);
474 goto Again;
475 }
476 /* fallthrough */
477 case TASK_IS_NOT_AT_LU:
478 SAS_DPRINTK("task 0x%p is not at LU: I_T recover\n",
479 task);
480 tmf_resp = sas_recover_I_T(task->dev);
481 if (tmf_resp == TMF_RESP_FUNC_COMPLETE) {
482 SAS_DPRINTK("I_T %016llx recovered\n",
483 SAS_ADDR(task->dev->sas_addr));
484 task->task_done(task);
485 if (need_reset)
486 eh_reset_phy_helper(task_sas_phy);
487 sas_scsi_clear_queue_I_T(&error_q, task->dev);
488 goto Again;
489 }
490 /* Hammer time :-) */
491 if (i->dft->lldd_clear_nexus_port) {
492 struct asd_sas_port *port = task->dev->port;
493 SAS_DPRINTK("clearing nexus for port:%d\n",
494 port->id);
495 res = i->dft->lldd_clear_nexus_port(port);
496 if (res == TMF_RESP_FUNC_COMPLETE) {
497 SAS_DPRINTK("clear nexus port:%d "
498 "succeeded\n", port->id);
499 task->task_done(task);
500 if (need_reset)
501 eh_reset_phy_helper(task_sas_phy);
502 sas_scsi_clear_queue_port(&error_q,
503 port);
504 goto Again;
505 }
506 }
507 if (i->dft->lldd_clear_nexus_ha) {
508 SAS_DPRINTK("clear nexus ha\n");
509 res = i->dft->lldd_clear_nexus_ha(ha);
510 if (res == TMF_RESP_FUNC_COMPLETE) {
511 SAS_DPRINTK("clear nexus ha "
512 "succeeded\n");
513 task->task_done(task);
514 if (need_reset)
515 eh_reset_phy_helper(task_sas_phy);
516 goto out;
517 }
518 }
519 /* If we are here -- this means that no amount
520 * of effort could recover from errors. Quite
521 * possibly the HA just disappeared.
522 */
523 SAS_DPRINTK("error from device %llx, LUN %x "
524 "couldn't be recovered in any way\n",
525 SAS_ADDR(task->dev->sas_addr),
526 cmd->device->lun);
527
528 task->task_done(task);
529 if (need_reset)
530 eh_reset_phy_helper(task_sas_phy);
531 goto clear_q;
532 }
533 }
534 out:
535 scsi_eh_flush_done_q(&ha->eh_done_q);
536 SAS_DPRINTK("--- Exit %s\n", __FUNCTION__);
537 return;
538 clear_q:
539 SAS_DPRINTK("--- Exit %s -- clear_q\n", __FUNCTION__);
540 list_for_each_entry_safe(cmd, n, &error_q, eh_entry) {
541 struct sas_task *task = TO_SAS_TASK(cmd);
542 list_del_init(&cmd->eh_entry);
543 task->task_done(task);
544 }
545 }
546
547 enum scsi_eh_timer_return sas_scsi_timed_out(struct scsi_cmnd *cmd)
548 {
549 struct sas_task *task = TO_SAS_TASK(cmd);
550 unsigned long flags;
551
552 if (!task) {
553 cmd->timeout_per_command /= 2;
554 SAS_DPRINTK("command 0x%p, task 0x%p, gone: %s\n",
555 cmd, task, (cmd->timeout_per_command ?
556 "EH_RESET_TIMER" : "EH_NOT_HANDLED"));
557 if (!cmd->timeout_per_command)
558 return EH_NOT_HANDLED;
559 return EH_RESET_TIMER;
560 }
561
562 spin_lock_irqsave(&task->task_state_lock, flags);
563 BUG_ON(task->task_state_flags & SAS_TASK_STATE_ABORTED);
564 if (task->task_state_flags & SAS_TASK_STATE_DONE) {
565 spin_unlock_irqrestore(&task->task_state_lock, flags);
566 SAS_DPRINTK("command 0x%p, task 0x%p, timed out: EH_HANDLED\n",
567 cmd, task);
568 return EH_HANDLED;
569 }
570 if (!(task->task_state_flags & SAS_TASK_AT_INITIATOR)) {
571 spin_unlock_irqrestore(&task->task_state_lock, flags);
572 SAS_DPRINTK("command 0x%p, task 0x%p, not at initiator: "
573 "EH_RESET_TIMER\n",
574 cmd, task);
575 return EH_RESET_TIMER;
576 }
577 task->task_state_flags |= SAS_TASK_STATE_ABORTED;
578 spin_unlock_irqrestore(&task->task_state_lock, flags);
579
580 SAS_DPRINTK("command 0x%p, task 0x%p, timed out: EH_NOT_HANDLED\n",
581 cmd, task);
582
583 return EH_NOT_HANDLED;
584 }
585
586 struct domain_device *sas_find_dev_by_rphy(struct sas_rphy *rphy)
587 {
588 struct Scsi_Host *shost = dev_to_shost(rphy->dev.parent);
589 struct sas_ha_struct *ha = SHOST_TO_SAS_HA(shost);
590 struct domain_device *found_dev = NULL;
591 int i;
592
593 spin_lock(&ha->phy_port_lock);
594 for (i = 0; i < ha->num_phys; i++) {
595 struct asd_sas_port *port = ha->sas_port[i];
596 struct domain_device *dev;
597
598 spin_lock(&port->dev_list_lock);
599 list_for_each_entry(dev, &port->dev_list, dev_list_node) {
600 if (rphy == dev->rphy) {
601 found_dev = dev;
602 spin_unlock(&port->dev_list_lock);
603 goto found;
604 }
605 }
606 spin_unlock(&port->dev_list_lock);
607 }
608 found:
609 spin_unlock(&ha->phy_port_lock);
610
611 return found_dev;
612 }
613
614 static inline struct domain_device *sas_find_target(struct scsi_target *starget)
615 {
616 struct sas_rphy *rphy = dev_to_rphy(starget->dev.parent);
617
618 return sas_find_dev_by_rphy(rphy);
619 }
620
621 int sas_target_alloc(struct scsi_target *starget)
622 {
623 struct domain_device *found_dev = sas_find_target(starget);
624
625 if (!found_dev)
626 return -ENODEV;
627
628 starget->hostdata = found_dev;
629 return 0;
630 }
631
632 #define SAS_DEF_QD 32
633 #define SAS_MAX_QD 64
634
635 int sas_slave_configure(struct scsi_device *scsi_dev)
636 {
637 struct domain_device *dev = sdev_to_domain_dev(scsi_dev);
638 struct sas_ha_struct *sas_ha;
639
640 BUG_ON(dev->rphy->identify.device_type != SAS_END_DEVICE);
641
642 sas_ha = dev->port->ha;
643
644 sas_read_port_mode_page(scsi_dev);
645
646 if (scsi_dev->tagged_supported) {
647 scsi_set_tag_type(scsi_dev, MSG_SIMPLE_TAG);
648 scsi_activate_tcq(scsi_dev, SAS_DEF_QD);
649 } else {
650 SAS_DPRINTK("device %llx, LUN %x doesn't support "
651 "TCQ\n", SAS_ADDR(dev->sas_addr),
652 scsi_dev->lun);
653 scsi_dev->tagged_supported = 0;
654 scsi_set_tag_type(scsi_dev, 0);
655 scsi_deactivate_tcq(scsi_dev, 1);
656 }
657
658 return 0;
659 }
660
661 void sas_slave_destroy(struct scsi_device *scsi_dev)
662 {
663 }
664
665 int sas_change_queue_depth(struct scsi_device *scsi_dev, int new_depth)
666 {
667 int res = min(new_depth, SAS_MAX_QD);
668
669 if (scsi_dev->tagged_supported)
670 scsi_adjust_queue_depth(scsi_dev, scsi_get_tag_type(scsi_dev),
671 res);
672 else {
673 struct domain_device *dev = sdev_to_domain_dev(scsi_dev);
674 sas_printk("device %llx LUN %x queue depth changed to 1\n",
675 SAS_ADDR(dev->sas_addr),
676 scsi_dev->lun);
677 scsi_adjust_queue_depth(scsi_dev, 0, 1);
678 res = 1;
679 }
680
681 return res;
682 }
683
684 int sas_change_queue_type(struct scsi_device *scsi_dev, int qt)
685 {
686 if (!scsi_dev->tagged_supported)
687 return 0;
688
689 scsi_deactivate_tcq(scsi_dev, 1);
690
691 scsi_set_tag_type(scsi_dev, qt);
692 scsi_activate_tcq(scsi_dev, scsi_dev->queue_depth);
693
694 return qt;
695 }
696
697 int sas_bios_param(struct scsi_device *scsi_dev,
698 struct block_device *bdev,
699 sector_t capacity, int *hsc)
700 {
701 hsc[0] = 255;
702 hsc[1] = 63;
703 sector_div(capacity, 255*63);
704 hsc[2] = capacity;
705
706 return 0;
707 }
708
709 /* ---------- Task Collector Thread implementation ---------- */
710
711 static void sas_queue(struct sas_ha_struct *sas_ha)
712 {
713 struct scsi_core *core = &sas_ha->core;
714 unsigned long flags;
715 LIST_HEAD(q);
716 int can_queue;
717 int res;
718 struct sas_internal *i = to_sas_internal(core->shost->transportt);
719
720 spin_lock_irqsave(&core->task_queue_lock, flags);
721 while (!core->queue_thread_kill &&
722 !list_empty(&core->task_queue)) {
723
724 can_queue = sas_ha->lldd_queue_size - core->task_queue_size;
725 if (can_queue >= 0) {
726 can_queue = core->task_queue_size;
727 list_splice_init(&core->task_queue, &q);
728 } else {
729 struct list_head *a, *n;
730
731 can_queue = sas_ha->lldd_queue_size;
732 list_for_each_safe(a, n, &core->task_queue) {
733 list_move_tail(a, &q);
734 if (--can_queue == 0)
735 break;
736 }
737 can_queue = sas_ha->lldd_queue_size;
738 }
739 core->task_queue_size -= can_queue;
740 spin_unlock_irqrestore(&core->task_queue_lock, flags);
741 {
742 struct sas_task *task = list_entry(q.next,
743 struct sas_task,
744 list);
745 list_del_init(&q);
746 res = i->dft->lldd_execute_task(task, can_queue,
747 GFP_KERNEL);
748 if (unlikely(res))
749 __list_add(&q, task->list.prev, &task->list);
750 }
751 spin_lock_irqsave(&core->task_queue_lock, flags);
752 if (res) {
753 list_splice_init(&q, &core->task_queue); /*at head*/
754 core->task_queue_size += can_queue;
755 }
756 }
757 spin_unlock_irqrestore(&core->task_queue_lock, flags);
758 }
759
760 static DECLARE_COMPLETION(queue_th_comp);
761
762 /**
763 * sas_queue_thread -- The Task Collector thread
764 * @_sas_ha: pointer to struct sas_ha
765 */
766 static int sas_queue_thread(void *_sas_ha)
767 {
768 struct sas_ha_struct *sas_ha = _sas_ha;
769 struct scsi_core *core = &sas_ha->core;
770
771 daemonize("sas_queue_%d", core->shost->host_no);
772 current->flags |= PF_NOFREEZE;
773
774 complete(&queue_th_comp);
775
776 while (1) {
777 down_interruptible(&core->queue_thread_sema);
778 sas_queue(sas_ha);
779 if (core->queue_thread_kill)
780 break;
781 }
782
783 complete(&queue_th_comp);
784
785 return 0;
786 }
787
788 int sas_init_queue(struct sas_ha_struct *sas_ha)
789 {
790 int res;
791 struct scsi_core *core = &sas_ha->core;
792
793 spin_lock_init(&core->task_queue_lock);
794 core->task_queue_size = 0;
795 INIT_LIST_HEAD(&core->task_queue);
796 init_MUTEX_LOCKED(&core->queue_thread_sema);
797
798 res = kernel_thread(sas_queue_thread, sas_ha, 0);
799 if (res >= 0)
800 wait_for_completion(&queue_th_comp);
801
802 return res < 0 ? res : 0;
803 }
804
805 void sas_shutdown_queue(struct sas_ha_struct *sas_ha)
806 {
807 unsigned long flags;
808 struct scsi_core *core = &sas_ha->core;
809 struct sas_task *task, *n;
810
811 init_completion(&queue_th_comp);
812 core->queue_thread_kill = 1;
813 up(&core->queue_thread_sema);
814 wait_for_completion(&queue_th_comp);
815
816 if (!list_empty(&core->task_queue))
817 SAS_DPRINTK("HA: %llx: scsi core task queue is NOT empty!?\n",
818 SAS_ADDR(sas_ha->sas_addr));
819
820 spin_lock_irqsave(&core->task_queue_lock, flags);
821 list_for_each_entry_safe(task, n, &core->task_queue, list) {
822 struct scsi_cmnd *cmd = task->uldd_task;
823
824 list_del_init(&task->list);
825
826 ASSIGN_SAS_TASK(cmd, NULL);
827 sas_free_task(task);
828 cmd->result = DID_ABORT << 16;
829 cmd->scsi_done(cmd);
830 }
831 spin_unlock_irqrestore(&core->task_queue_lock, flags);
832 }
833
834 /*
835 * Call the LLDD task abort routine directly. This function is intended for
836 * use by upper layers that need to tell the LLDD to abort a task.
837 */
838 int __sas_task_abort(struct sas_task *task)
839 {
840 struct sas_internal *si =
841 to_sas_internal(task->dev->port->ha->core.shost->transportt);
842 unsigned long flags;
843 int res;
844
845 spin_lock_irqsave(&task->task_state_lock, flags);
846 if (task->task_state_flags & SAS_TASK_STATE_ABORTED ||
847 task->task_state_flags & SAS_TASK_STATE_DONE) {
848 spin_unlock_irqrestore(&task->task_state_lock, flags);
849 SAS_DPRINTK("%s: Task %p already finished.\n", __FUNCTION__,
850 task);
851 return 0;
852 }
853 task->task_state_flags |= SAS_TASK_STATE_ABORTED;
854 spin_unlock_irqrestore(&task->task_state_lock, flags);
855
856 if (!si->dft->lldd_abort_task)
857 return -ENODEV;
858
859 res = si->dft->lldd_abort_task(task);
860
861 spin_lock_irqsave(&task->task_state_lock, flags);
862 if ((task->task_state_flags & SAS_TASK_STATE_DONE) ||
863 (res == TMF_RESP_FUNC_COMPLETE))
864 {
865 spin_unlock_irqrestore(&task->task_state_lock, flags);
866 task->task_done(task);
867 return 0;
868 }
869
870 if (!(task->task_state_flags & SAS_TASK_STATE_DONE))
871 task->task_state_flags &= ~SAS_TASK_STATE_ABORTED;
872 spin_unlock_irqrestore(&task->task_state_lock, flags);
873
874 return -EAGAIN;
875 }
876
877 /*
878 * Tell an upper layer that it needs to initiate an abort for a given task.
879 * This should only ever be called by an LLDD.
880 */
881 void sas_task_abort(struct sas_task *task)
882 {
883 struct scsi_cmnd *sc = task->uldd_task;
884
885 /* Escape for libsas internal commands */
886 if (!sc) {
887 if (!del_timer(&task->timer))
888 return;
889 task->timer.function(task->timer.data);
890 return;
891 }
892
893 scsi_req_abort_cmd(sc);
894 scsi_schedule_eh(sc->device->host);
895 }
896
897 EXPORT_SYMBOL_GPL(sas_queuecommand);
898 EXPORT_SYMBOL_GPL(sas_target_alloc);
899 EXPORT_SYMBOL_GPL(sas_slave_configure);
900 EXPORT_SYMBOL_GPL(sas_slave_destroy);
901 EXPORT_SYMBOL_GPL(sas_change_queue_depth);
902 EXPORT_SYMBOL_GPL(sas_change_queue_type);
903 EXPORT_SYMBOL_GPL(sas_bios_param);
904 EXPORT_SYMBOL_GPL(__sas_task_abort);
905 EXPORT_SYMBOL_GPL(sas_task_abort);
906 EXPORT_SYMBOL_GPL(sas_phy_reset);
907 EXPORT_SYMBOL_GPL(sas_phy_enable);
Linux 2.6 ibm-acpi/thinkpad-acpi driver git tree