2 * Aic94xx SAS/SATA Tasks
4 * Copyright (C) 2005 Adaptec, Inc. All rights reserved.
5 * Copyright (C) 2005 Luben Tuikov <luben_tuikov@adaptec.com>
7 * This file is licensed under GPLv2.
9 * This file is part of the aic94xx driver.
11 * The aic94xx driver is free software; you can redistribute it and/or
12 * modify it under the terms of the GNU General Public License as
13 * published by the Free Software Foundation; version 2 of the
16 * The aic94xx driver is distributed in the hope that it will be useful,
17 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
19 * General Public License for more details.
21 * You should have received a copy of the GNU General Public License
22 * along with the aic94xx driver; if not, write to the Free Software
23 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
27 #include <linux/spinlock.h>
29 #include "aic94xx_sas.h"
30 #include "aic94xx_hwi.h"
32 static void asd_unbuild_ata_ascb(struct asd_ascb *a);
33 static void asd_unbuild_smp_ascb(struct asd_ascb *a);
34 static void asd_unbuild_ssp_ascb(struct asd_ascb *a);
36 static inline void asd_can_dequeue(struct asd_ha_struct *asd_ha, int num)
40 spin_lock_irqsave(&asd_ha->seq.pend_q_lock, flags);
41 asd_ha->seq.can_queue += num;
42 spin_unlock_irqrestore(&asd_ha->seq.pend_q_lock, flags);
45 /* PCI_DMA_... to our direction translation.
47 static const u8 data_dir_flags[] = {
48 [PCI_DMA_BIDIRECTIONAL] = DATA_DIR_BYRECIPIENT, /* UNSPECIFIED */
49 [PCI_DMA_TODEVICE] = DATA_DIR_OUT, /* OUTBOUND */
50 [PCI_DMA_FROMDEVICE] = DATA_DIR_IN, /* INBOUND */
51 [PCI_DMA_NONE] = DATA_DIR_NONE, /* NO TRANSFER */
54 static inline int asd_map_scatterlist(struct sas_task *task,
58 struct asd_ascb *ascb = task->lldd_task;
59 struct asd_ha_struct *asd_ha = ascb->ha;
60 struct scatterlist *sc;
63 if (task->data_dir == PCI_DMA_NONE)
66 if (task->num_scatter == 0) {
67 void *p = task->scatter;
68 dma_addr_t dma = pci_map_single(asd_ha->pcidev, p,
71 sg_arr[0].bus_addr = cpu_to_le64((u64)dma);
72 sg_arr[0].size = cpu_to_le32(task->total_xfer_len);
73 sg_arr[0].flags |= ASD_SG_EL_LIST_EOL;
77 /* STP tasks come from libata which has already mapped
79 if (sas_protocol_ata(task->task_proto))
80 num_sg = task->num_scatter;
82 num_sg = pci_map_sg(asd_ha->pcidev, task->scatter,
83 task->num_scatter, task->data_dir);
90 ascb->sg_arr = asd_alloc_coherent(asd_ha,
91 num_sg*sizeof(struct sg_el),
97 for_each_sg(task->scatter, sc, num_sg, i) {
99 &((struct sg_el *)ascb->sg_arr->vaddr)[i];
100 sg->bus_addr = cpu_to_le64((u64)sg_dma_address(sc));
101 sg->size = cpu_to_le32((u32)sg_dma_len(sc));
103 sg->flags |= ASD_SG_EL_LIST_EOL;
106 for_each_sg(task->scatter, sc, 2, i) {
108 cpu_to_le64((u64)sg_dma_address(sc));
109 sg_arr[i].size = cpu_to_le32((u32)sg_dma_len(sc));
111 sg_arr[1].next_sg_offs = 2 * sizeof(*sg_arr);
112 sg_arr[1].flags |= ASD_SG_EL_LIST_EOS;
114 memset(&sg_arr[2], 0, sizeof(*sg_arr));
115 sg_arr[2].bus_addr=cpu_to_le64((u64)ascb->sg_arr->dma_handle);
118 for_each_sg(task->scatter, sc, num_sg, i) {
120 cpu_to_le64((u64)sg_dma_address(sc));
121 sg_arr[i].size = cpu_to_le32((u32)sg_dma_len(sc));
123 sg_arr[i-1].flags |= ASD_SG_EL_LIST_EOL;
128 if (sas_protocol_ata(task->task_proto))
129 pci_unmap_sg(asd_ha->pcidev, task->scatter, task->num_scatter,
134 static inline void asd_unmap_scatterlist(struct asd_ascb *ascb)
136 struct asd_ha_struct *asd_ha = ascb->ha;
137 struct sas_task *task = ascb->uldd_task;
139 if (task->data_dir == PCI_DMA_NONE)
142 if (task->num_scatter == 0) {
143 dma_addr_t dma = (dma_addr_t)
144 le64_to_cpu(ascb->scb->ssp_task.sg_element[0].bus_addr);
145 pci_unmap_single(ascb->ha->pcidev, dma, task->total_xfer_len,
150 asd_free_coherent(asd_ha, ascb->sg_arr);
151 if (task->task_proto != SAS_PROTOCOL_STP)
152 pci_unmap_sg(asd_ha->pcidev, task->scatter, task->num_scatter,
156 /* ---------- Task complete tasklet ---------- */
158 static void asd_get_response_tasklet(struct asd_ascb *ascb,
159 struct done_list_struct *dl)
161 struct asd_ha_struct *asd_ha = ascb->ha;
162 struct sas_task *task = ascb->uldd_task;
163 struct task_status_struct *ts = &task->task_status;
165 struct tc_resp_sb_struct {
169 } __attribute__ ((packed)) *resp_sb = (void *) dl->status_block;
171 /* int size = ((resp_sb->flags & 7) << 8) | resp_sb->len_lsb; */
172 int edb_id = ((resp_sb->flags & 0x70) >> 4)-1;
173 struct asd_ascb *escb;
174 struct asd_dma_tok *edb;
177 spin_lock_irqsave(&asd_ha->seq.tc_index_lock, flags);
178 escb = asd_tc_index_find(&asd_ha->seq,
179 (int)le16_to_cpu(resp_sb->index_escb));
180 spin_unlock_irqrestore(&asd_ha->seq.tc_index_lock, flags);
183 ASD_DPRINTK("Uh-oh! No escb for this dl?!\n");
187 ts->buf_valid_size = 0;
188 edb = asd_ha->seq.edb_arr[edb_id + escb->edb_index];
190 if (task->task_proto == SAS_PROTOCOL_SSP) {
191 struct ssp_response_iu *iu =
192 r + 16 + sizeof(struct ssp_frame_hdr);
194 ts->residual = le32_to_cpu(*(__le32 *)r);
196 sas_ssp_task_response(&asd_ha->pcidev->dev, task, iu);
198 struct ata_task_resp *resp = (void *) &ts->buf[0];
200 ts->residual = le32_to_cpu(*(__le32 *)r);
202 if (SAS_STATUS_BUF_SIZE >= sizeof(*resp)) {
203 resp->frame_len = le16_to_cpu(*(__le16 *)(r+6));
204 memcpy(&resp->ending_fis[0], r+16, 24);
205 ts->buf_valid_size = sizeof(*resp);
209 asd_invalidate_edb(escb, edb_id);
212 static void asd_task_tasklet_complete(struct asd_ascb *ascb,
213 struct done_list_struct *dl)
215 struct sas_task *task = ascb->uldd_task;
216 struct task_status_struct *ts = &task->task_status;
218 u8 opcode = dl->opcode;
220 asd_can_dequeue(ascb->ha, 1);
225 ts->resp = SAS_TASK_COMPLETE;
229 ts->resp = SAS_TASK_COMPLETE;
230 ts->stat = SAS_DATA_UNDERRUN;
231 ts->residual = le32_to_cpu(*(__le32 *)dl->status_block);
234 ts->resp = SAS_TASK_COMPLETE;
235 ts->stat = SAS_DATA_OVERRUN;
240 ts->resp = SAS_TASK_COMPLETE;
241 ts->stat = SAS_PROTO_RESPONSE;
242 asd_get_response_tasklet(ascb, dl);
245 ts->resp = SAS_TASK_UNDELIVERED;
246 ts->stat = SAS_OPEN_REJECT;
247 if (dl->status_block[1] & 2)
248 ts->open_rej_reason = 1 + dl->status_block[2];
249 else if (dl->status_block[1] & 1)
250 ts->open_rej_reason = (dl->status_block[2] >> 4)+10;
252 ts->open_rej_reason = SAS_OREJ_UNKNOWN;
255 ts->resp = SAS_TASK_UNDELIVERED;
256 ts->stat = SAS_OPEN_TO;
260 ts->resp = SAS_TASK_UNDELIVERED;
261 ts->stat = SAS_PHY_DOWN;
264 ts->resp = SAS_TASK_COMPLETE;
265 ts->stat = SAS_PHY_DOWN;
271 case TF_SMP_XMIT_RCV_ERR:
272 case TC_ATA_R_ERR_RECV:
273 ts->resp = SAS_TASK_COMPLETE;
274 ts->stat = SAS_INTERRUPTED;
280 ts->resp = SAS_TASK_UNDELIVERED;
281 ts->stat = SAS_DEV_NO_RESPONSE;
284 ts->resp = SAS_TASK_COMPLETE;
285 ts->stat = SAS_NAK_R_ERR;
287 case TA_I_T_NEXUS_LOSS:
288 opcode = dl->status_block[0];
291 case TF_INV_CONN_HANDLE:
292 ts->resp = SAS_TASK_UNDELIVERED;
293 ts->stat = SAS_DEVICE_UNKNOWN;
295 case TF_REQUESTED_N_PENDING:
296 ts->resp = SAS_TASK_UNDELIVERED;
297 ts->stat = SAS_PENDING;
299 case TC_TASK_CLEARED:
301 ts->resp = SAS_TASK_COMPLETE;
302 ts->stat = SAS_ABORTED_TASK;
308 case TF_TMF_TAG_FREE:
309 case TF_TMF_TASK_DONE:
310 case TF_TMF_NO_CONN_HANDLE:
313 case TF_DATA_OFFS_ERR:
314 ts->resp = SAS_TASK_UNDELIVERED;
315 ts->stat = SAS_DEV_NO_RESPONSE;
318 case TC_LINK_ADM_RESP:
321 case TC_PARTIAL_SG_LIST:
323 ASD_DPRINTK("%s: dl opcode: 0x%x?\n", __FUNCTION__, opcode);
327 switch (task->task_proto) {
328 case SAS_PROTOCOL_SATA:
329 case SAS_PROTOCOL_STP:
330 asd_unbuild_ata_ascb(ascb);
332 case SAS_PROTOCOL_SMP:
333 asd_unbuild_smp_ascb(ascb);
335 case SAS_PROTOCOL_SSP:
336 asd_unbuild_ssp_ascb(ascb);
341 spin_lock_irqsave(&task->task_state_lock, flags);
342 task->task_state_flags &= ~SAS_TASK_STATE_PENDING;
343 task->task_state_flags &= ~SAS_TASK_AT_INITIATOR;
344 task->task_state_flags |= SAS_TASK_STATE_DONE;
345 if (unlikely((task->task_state_flags & SAS_TASK_STATE_ABORTED))) {
346 spin_unlock_irqrestore(&task->task_state_lock, flags);
347 ASD_DPRINTK("task 0x%p done with opcode 0x%x resp 0x%x "
348 "stat 0x%x but aborted by upper layer!\n",
349 task, opcode, ts->resp, ts->stat);
350 complete(&ascb->completion);
352 spin_unlock_irqrestore(&task->task_state_lock, flags);
353 task->lldd_task = NULL;
356 task->task_done(task);
360 /* ---------- ATA ---------- */
362 static int asd_build_ata_ascb(struct asd_ascb *ascb, struct sas_task *task,
365 struct domain_device *dev = task->dev;
372 if (unlikely(task->ata_task.device_control_reg_update))
373 scb->header.opcode = CONTROL_ATA_DEV;
374 else if (dev->sata_dev.command_set == ATA_COMMAND_SET)
375 scb->header.opcode = INITIATE_ATA_TASK;
377 scb->header.opcode = INITIATE_ATAPI_TASK;
379 scb->ata_task.proto_conn_rate = (1 << 5); /* STP */
380 if (dev->port->oob_mode == SAS_OOB_MODE)
381 scb->ata_task.proto_conn_rate |= dev->linkrate;
383 scb->ata_task.total_xfer_len = cpu_to_le32(task->total_xfer_len);
384 scb->ata_task.fis = task->ata_task.fis;
385 if (likely(!task->ata_task.device_control_reg_update))
386 scb->ata_task.fis.flags |= 0x80; /* C=1: update ATA cmd reg */
387 scb->ata_task.fis.flags &= 0xF0; /* PM_PORT field shall be 0 */
388 if (dev->sata_dev.command_set == ATAPI_COMMAND_SET)
389 memcpy(scb->ata_task.atapi_packet, task->ata_task.atapi_packet,
391 scb->ata_task.sister_scb = cpu_to_le16(0xFFFF);
392 scb->ata_task.conn_handle = cpu_to_le16(
393 (u16)(unsigned long)dev->lldd_dev);
395 if (likely(!task->ata_task.device_control_reg_update)) {
397 if (task->ata_task.dma_xfer)
398 flags |= DATA_XFER_MODE_DMA;
399 if (task->ata_task.use_ncq &&
400 dev->sata_dev.command_set != ATAPI_COMMAND_SET)
401 flags |= ATA_Q_TYPE_NCQ;
402 flags |= data_dir_flags[task->data_dir];
403 scb->ata_task.ata_flags = flags;
405 scb->ata_task.retry_count = task->ata_task.retry_count;
408 if (task->ata_task.set_affil_pol)
409 flags |= SET_AFFIL_POLICY;
410 if (task->ata_task.stp_affil_pol)
411 flags |= STP_AFFIL_POLICY;
412 scb->ata_task.flags = flags;
414 ascb->tasklet_complete = asd_task_tasklet_complete;
416 if (likely(!task->ata_task.device_control_reg_update))
417 res = asd_map_scatterlist(task, scb->ata_task.sg_element,
423 static void asd_unbuild_ata_ascb(struct asd_ascb *a)
425 asd_unmap_scatterlist(a);
428 /* ---------- SMP ---------- */
430 static int asd_build_smp_ascb(struct asd_ascb *ascb, struct sas_task *task,
433 struct asd_ha_struct *asd_ha = ascb->ha;
434 struct domain_device *dev = task->dev;
437 pci_map_sg(asd_ha->pcidev, &task->smp_task.smp_req, 1,
439 pci_map_sg(asd_ha->pcidev, &task->smp_task.smp_resp, 1,
444 scb->header.opcode = INITIATE_SMP_TASK;
446 scb->smp_task.proto_conn_rate = dev->linkrate;
448 scb->smp_task.smp_req.bus_addr =
449 cpu_to_le64((u64)sg_dma_address(&task->smp_task.smp_req));
450 scb->smp_task.smp_req.size =
451 cpu_to_le32((u32)sg_dma_len(&task->smp_task.smp_req)-4);
453 scb->smp_task.smp_resp.bus_addr =
454 cpu_to_le64((u64)sg_dma_address(&task->smp_task.smp_resp));
455 scb->smp_task.smp_resp.size =
456 cpu_to_le32((u32)sg_dma_len(&task->smp_task.smp_resp)-4);
458 scb->smp_task.sister_scb = cpu_to_le16(0xFFFF);
459 scb->smp_task.conn_handle = cpu_to_le16((u16)
460 (unsigned long)dev->lldd_dev);
462 ascb->tasklet_complete = asd_task_tasklet_complete;
467 static void asd_unbuild_smp_ascb(struct asd_ascb *a)
469 struct sas_task *task = a->uldd_task;
472 pci_unmap_sg(a->ha->pcidev, &task->smp_task.smp_req, 1,
474 pci_unmap_sg(a->ha->pcidev, &task->smp_task.smp_resp, 1,
478 /* ---------- SSP ---------- */
480 static int asd_build_ssp_ascb(struct asd_ascb *ascb, struct sas_task *task,
483 struct domain_device *dev = task->dev;
489 scb->header.opcode = INITIATE_SSP_TASK;
491 scb->ssp_task.proto_conn_rate = (1 << 4); /* SSP */
492 scb->ssp_task.proto_conn_rate |= dev->linkrate;
493 scb->ssp_task.total_xfer_len = cpu_to_le32(task->total_xfer_len);
494 scb->ssp_task.ssp_frame.frame_type = SSP_DATA;
495 memcpy(scb->ssp_task.ssp_frame.hashed_dest_addr, dev->hashed_sas_addr,
496 HASHED_SAS_ADDR_SIZE);
497 memcpy(scb->ssp_task.ssp_frame.hashed_src_addr,
498 dev->port->ha->hashed_sas_addr, HASHED_SAS_ADDR_SIZE);
499 scb->ssp_task.ssp_frame.tptt = cpu_to_be16(0xFFFF);
501 memcpy(scb->ssp_task.ssp_cmd.lun, task->ssp_task.LUN, 8);
502 if (task->ssp_task.enable_first_burst)
503 scb->ssp_task.ssp_cmd.efb_prio_attr |= EFB_MASK;
504 scb->ssp_task.ssp_cmd.efb_prio_attr |= (task->ssp_task.task_prio << 3);
505 scb->ssp_task.ssp_cmd.efb_prio_attr |= (task->ssp_task.task_attr & 7);
506 memcpy(scb->ssp_task.ssp_cmd.cdb, task->ssp_task.cdb, 16);
508 scb->ssp_task.sister_scb = cpu_to_le16(0xFFFF);
509 scb->ssp_task.conn_handle = cpu_to_le16(
510 (u16)(unsigned long)dev->lldd_dev);
511 scb->ssp_task.data_dir = data_dir_flags[task->data_dir];
512 scb->ssp_task.retry_count = scb->ssp_task.retry_count;
514 ascb->tasklet_complete = asd_task_tasklet_complete;
516 res = asd_map_scatterlist(task, scb->ssp_task.sg_element, gfp_flags);
521 static void asd_unbuild_ssp_ascb(struct asd_ascb *a)
523 asd_unmap_scatterlist(a);
526 /* ---------- Execute Task ---------- */
528 static inline int asd_can_queue(struct asd_ha_struct *asd_ha, int num)
533 spin_lock_irqsave(&asd_ha->seq.pend_q_lock, flags);
534 if ((asd_ha->seq.can_queue - num) < 0)
535 res = -SAS_QUEUE_FULL;
537 asd_ha->seq.can_queue -= num;
538 spin_unlock_irqrestore(&asd_ha->seq.pend_q_lock, flags);
543 int asd_execute_task(struct sas_task *task, const int num,
548 struct sas_task *t = task;
549 struct asd_ascb *ascb = NULL, *a;
550 struct asd_ha_struct *asd_ha = task->dev->port->ha->lldd_ha;
553 res = asd_can_queue(asd_ha, num);
558 ascb = asd_ascb_alloc_list(asd_ha, &res, gfp_flags);
564 __list_add(&alist, ascb->list.prev, &ascb->list);
565 list_for_each_entry(a, &alist, list) {
568 t = list_entry(t->list.next, struct sas_task, list);
570 list_for_each_entry(a, &alist, list) {
573 if (t->task_proto & SAS_PROTOCOL_STP)
574 t->task_proto = SAS_PROTOCOL_STP;
575 switch (t->task_proto) {
576 case SAS_PROTOCOL_SATA:
577 case SAS_PROTOCOL_STP:
578 res = asd_build_ata_ascb(a, t, gfp_flags);
580 case SAS_PROTOCOL_SMP:
581 res = asd_build_smp_ascb(a, t, gfp_flags);
583 case SAS_PROTOCOL_SSP:
584 res = asd_build_ssp_ascb(a, t, gfp_flags);
587 asd_printk("unknown sas_task proto: 0x%x\n",
595 spin_lock_irqsave(&t->task_state_lock, flags);
596 t->task_state_flags |= SAS_TASK_AT_INITIATOR;
597 spin_unlock_irqrestore(&t->task_state_lock, flags);
599 list_del_init(&alist);
601 res = asd_post_ascb_list(asd_ha, ascb, num);
604 __list_add(&alist, ascb->list.prev, &ascb->list);
611 struct asd_ascb *b = a;
612 list_for_each_entry(a, &alist, list) {
616 spin_lock_irqsave(&t->task_state_lock, flags);
617 t->task_state_flags &= ~SAS_TASK_AT_INITIATOR;
618 spin_unlock_irqrestore(&t->task_state_lock, flags);
619 switch (t->task_proto) {
620 case SAS_PROTOCOL_SATA:
621 case SAS_PROTOCOL_STP:
622 asd_unbuild_ata_ascb(a);
624 case SAS_PROTOCOL_SMP:
625 asd_unbuild_smp_ascb(a);
627 case SAS_PROTOCOL_SSP:
628 asd_unbuild_ssp_ascb(a);
635 list_del_init(&alist);
638 asd_ascb_free_list(ascb);
639 asd_can_dequeue(asd_ha, num);