[SCSI] sas_ata: ata_post_internal should abort the sas_task
[safe/jmp/linux-2.6] / drivers / scsi / libsas / sas_ata.c
1 /*
2  * Support for SATA devices on Serial Attached SCSI (SAS) controllers
3  *
4  * Copyright (C) 2006 IBM Corporation
5  *
6  * Written by: Darrick J. Wong <djwong@us.ibm.com>, IBM Corporation
7  *
8  * This program is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU General Public License as
10  * published by the Free Software Foundation; either version 2 of the
11  * License, or (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful, but
14  * WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
21  * USA
22  */
23
24 #include <scsi/sas_ata.h>
25 #include "sas_internal.h"
26 #include <scsi/scsi_host.h>
27 #include <scsi/scsi_device.h>
28 #include <scsi/scsi_tcq.h>
29 #include <scsi/scsi.h>
30 #include <scsi/scsi_transport.h>
31 #include <scsi/scsi_transport_sas.h>
32 #include "../scsi_sas_internal.h"
33
34 static enum ata_completion_errors sas_to_ata_err(struct task_status_struct *ts)
35 {
36         /* Cheesy attempt to translate SAS errors into ATA.  Hah! */
37
38         /* transport error */
39         if (ts->resp == SAS_TASK_UNDELIVERED)
40                 return AC_ERR_ATA_BUS;
41
42         /* ts->resp == SAS_TASK_COMPLETE */
43         /* task delivered, what happened afterwards? */
44         switch (ts->stat) {
45                 case SAS_DEV_NO_RESPONSE:
46                         return AC_ERR_TIMEOUT;
47
48                 case SAS_INTERRUPTED:
49                 case SAS_PHY_DOWN:
50                 case SAS_NAK_R_ERR:
51                         return AC_ERR_ATA_BUS;
52
53
54                 case SAS_DATA_UNDERRUN:
55                         /*
56                          * Some programs that use the taskfile interface
57                          * (smartctl in particular) can cause underrun
58                          * problems.  Ignore these errors, perhaps at our
59                          * peril.
60                          */
61                         return 0;
62
63                 case SAS_DATA_OVERRUN:
64                 case SAS_QUEUE_FULL:
65                 case SAS_DEVICE_UNKNOWN:
66                 case SAS_SG_ERR:
67                         return AC_ERR_INVALID;
68
69                 case SAM_CHECK_COND:
70                 case SAS_OPEN_TO:
71                 case SAS_OPEN_REJECT:
72                         SAS_DPRINTK("%s: Saw error %d.  What to do?\n",
73                                     __FUNCTION__, ts->stat);
74                         return AC_ERR_OTHER;
75
76                 case SAS_ABORTED_TASK:
77                         return AC_ERR_DEV;
78
79                 case SAS_PROTO_RESPONSE:
80                         /* This means the ending_fis has the error
81                          * value; return 0 here to collect it */
82                         return 0;
83                 default:
84                         return 0;
85         }
86 }
87
88 static void sas_ata_task_done(struct sas_task *task)
89 {
90         struct ata_queued_cmd *qc = task->uldd_task;
91         struct domain_device *dev;
92         struct task_status_struct *stat = &task->task_status;
93         struct ata_task_resp *resp = (struct ata_task_resp *)stat->buf;
94         enum ata_completion_errors ac;
95         unsigned long flags;
96
97         if (!qc)
98                 goto qc_already_gone;
99
100         dev = qc->ap->private_data;
101
102         spin_lock_irqsave(dev->sata_dev.ap->lock, flags);
103         if (stat->stat == SAS_PROTO_RESPONSE) {
104                 ata_tf_from_fis(resp->ending_fis, &dev->sata_dev.tf);
105                 qc->err_mask |= ac_err_mask(dev->sata_dev.tf.command);
106                 dev->sata_dev.sstatus = resp->sstatus;
107                 dev->sata_dev.serror = resp->serror;
108                 dev->sata_dev.scontrol = resp->scontrol;
109                 dev->sata_dev.ap->sactive = resp->sactive;
110         } else if (stat->stat != SAM_STAT_GOOD) {
111                 ac = sas_to_ata_err(stat);
112                 if (ac) {
113                         SAS_DPRINTK("%s: SAS error %x\n", __FUNCTION__,
114                                     stat->stat);
115                         /* We saw a SAS error. Send a vague error. */
116                         qc->err_mask = ac;
117                         dev->sata_dev.tf.feature = 0x04; /* status err */
118                         dev->sata_dev.tf.command = ATA_ERR;
119                 }
120         }
121
122         qc->lldd_task = NULL;
123         ata_qc_complete(qc);
124         spin_unlock_irqrestore(dev->sata_dev.ap->lock, flags);
125
126 qc_already_gone:
127         list_del_init(&task->list);
128         sas_free_task(task);
129 }
130
131 static unsigned int sas_ata_qc_issue(struct ata_queued_cmd *qc)
132 {
133         int res;
134         struct sas_task *task;
135         struct domain_device *dev = qc->ap->private_data;
136         struct sas_ha_struct *sas_ha = dev->port->ha;
137         struct Scsi_Host *host = sas_ha->core.shost;
138         struct sas_internal *i = to_sas_internal(host->transportt);
139         struct scatterlist *sg;
140         unsigned int num = 0;
141         unsigned int xfer = 0;
142
143         task = sas_alloc_task(GFP_ATOMIC);
144         if (!task)
145                 return AC_ERR_SYSTEM;
146         task->dev = dev;
147         task->task_proto = SAS_PROTOCOL_STP;
148         task->task_done = sas_ata_task_done;
149
150         if (qc->tf.command == ATA_CMD_FPDMA_WRITE ||
151             qc->tf.command == ATA_CMD_FPDMA_READ) {
152                 /* Need to zero out the tag libata assigned us */
153                 qc->tf.nsect = 0;
154         }
155
156         ata_tf_to_fis(&qc->tf, (u8*)&task->ata_task.fis, 0);
157         task->uldd_task = qc;
158         if (is_atapi_taskfile(&qc->tf)) {
159                 memcpy(task->ata_task.atapi_packet, qc->cdb, qc->dev->cdb_len);
160                 task->total_xfer_len = qc->nbytes + qc->pad_len;
161                 task->num_scatter = qc->pad_len ? qc->n_elem + 1 : qc->n_elem;
162         } else {
163                 ata_for_each_sg(sg, qc) {
164                         num++;
165                         xfer += sg->length;
166                 }
167
168                 task->total_xfer_len = xfer;
169                 task->num_scatter = num;
170         }
171
172         task->data_dir = qc->dma_dir;
173         task->scatter = qc->__sg;
174         task->ata_task.retry_count = 1;
175         task->task_state_flags = SAS_TASK_STATE_PENDING;
176         qc->lldd_task = task;
177
178         switch (qc->tf.protocol) {
179         case ATA_PROT_NCQ:
180                 task->ata_task.use_ncq = 1;
181                 /* fall through */
182         case ATA_PROT_ATAPI_DMA:
183         case ATA_PROT_DMA:
184                 task->ata_task.dma_xfer = 1;
185                 break;
186         }
187
188         if (sas_ha->lldd_max_execute_num < 2)
189                 res = i->dft->lldd_execute_task(task, 1, GFP_ATOMIC);
190         else
191                 res = sas_queue_up(task);
192
193         /* Examine */
194         if (res) {
195                 SAS_DPRINTK("lldd_execute_task returned: %d\n", res);
196
197                 sas_free_task(task);
198                 return AC_ERR_SYSTEM;
199         }
200
201         return 0;
202 }
203
204 static u8 sas_ata_check_status(struct ata_port *ap)
205 {
206         struct domain_device *dev = ap->private_data;
207         return dev->sata_dev.tf.command;
208 }
209
210 static void sas_ata_phy_reset(struct ata_port *ap)
211 {
212         struct domain_device *dev = ap->private_data;
213         struct sas_internal *i =
214                 to_sas_internal(dev->port->ha->core.shost->transportt);
215         int res = 0;
216
217         if (i->dft->lldd_I_T_nexus_reset)
218                 res = i->dft->lldd_I_T_nexus_reset(dev);
219
220         if (res)
221                 SAS_DPRINTK("%s: Unable to reset I T nexus?\n", __FUNCTION__);
222
223         switch (dev->sata_dev.command_set) {
224                 case ATA_COMMAND_SET:
225                         SAS_DPRINTK("%s: Found ATA device.\n", __FUNCTION__);
226                         ap->device[0].class = ATA_DEV_ATA;
227                         break;
228                 case ATAPI_COMMAND_SET:
229                         SAS_DPRINTK("%s: Found ATAPI device.\n", __FUNCTION__);
230                         ap->device[0].class = ATA_DEV_ATAPI;
231                         break;
232                 default:
233                         SAS_DPRINTK("%s: Unknown SATA command set: %d.\n",
234                                     __FUNCTION__,
235                                     dev->sata_dev.command_set);
236                         ap->device[0].class = ATA_DEV_ATA;
237                         break;
238         }
239
240         ap->cbl = ATA_CBL_SATA;
241 }
242
243 static void sas_ata_post_internal(struct ata_queued_cmd *qc)
244 {
245         if (qc->flags & ATA_QCFLAG_FAILED)
246                 qc->err_mask |= AC_ERR_OTHER;
247
248         if (qc->err_mask) {
249                 /*
250                  * Find the sas_task and kill it.  By this point,
251                  * libata has decided to kill the qc, so we needn't
252                  * bother with sas_ata_task_done.  But we still
253                  * ought to abort the task.
254                  */
255                 struct sas_task *task = qc->lldd_task;
256                 struct domain_device *dev = qc->ap->private_data;
257
258                 qc->lldd_task = NULL;
259                 if (task) {
260                         task->uldd_task = NULL;
261                         __sas_task_abort(task);
262                 }
263
264                 sas_phy_reset(dev->port->phy, 1);
265         }
266 }
267
268 static void sas_ata_tf_read(struct ata_port *ap, struct ata_taskfile *tf)
269 {
270         struct domain_device *dev = ap->private_data;
271         memcpy(tf, &dev->sata_dev.tf, sizeof (*tf));
272 }
273
274 static void sas_ata_scr_write(struct ata_port *ap, unsigned int sc_reg_in,
275                               u32 val)
276 {
277         struct domain_device *dev = ap->private_data;
278
279         SAS_DPRINTK("STUB %s\n", __FUNCTION__);
280         switch (sc_reg_in) {
281                 case SCR_STATUS:
282                         dev->sata_dev.sstatus = val;
283                         break;
284                 case SCR_CONTROL:
285                         dev->sata_dev.scontrol = val;
286                         break;
287                 case SCR_ERROR:
288                         dev->sata_dev.serror = val;
289                         break;
290                 case SCR_ACTIVE:
291                         dev->sata_dev.ap->sactive = val;
292                         break;
293         }
294 }
295
296 static u32 sas_ata_scr_read(struct ata_port *ap, unsigned int sc_reg_in)
297 {
298         struct domain_device *dev = ap->private_data;
299
300         SAS_DPRINTK("STUB %s\n", __FUNCTION__);
301         switch (sc_reg_in) {
302                 case SCR_STATUS:
303                         return dev->sata_dev.sstatus;
304                 case SCR_CONTROL:
305                         return dev->sata_dev.scontrol;
306                 case SCR_ERROR:
307                         return dev->sata_dev.serror;
308                 case SCR_ACTIVE:
309                         return dev->sata_dev.ap->sactive;
310                 default:
311                         return 0xffffffffU;
312         }
313 }
314
315 static struct ata_port_operations sas_sata_ops = {
316         .port_disable           = ata_port_disable,
317         .check_status           = sas_ata_check_status,
318         .check_altstatus        = sas_ata_check_status,
319         .dev_select             = ata_noop_dev_select,
320         .phy_reset              = sas_ata_phy_reset,
321         .post_internal_cmd      = sas_ata_post_internal,
322         .tf_read                = sas_ata_tf_read,
323         .qc_prep                = ata_noop_qc_prep,
324         .qc_issue               = sas_ata_qc_issue,
325         .port_start             = ata_sas_port_start,
326         .port_stop              = ata_sas_port_stop,
327         .scr_read               = sas_ata_scr_read,
328         .scr_write              = sas_ata_scr_write
329 };
330
331 static struct ata_port_info sata_port_info = {
332         .flags = ATA_FLAG_SATA | ATA_FLAG_NO_LEGACY | ATA_FLAG_SATA_RESET |
333                 ATA_FLAG_MMIO | ATA_FLAG_PIO_DMA | ATA_FLAG_NCQ,
334         .pio_mask = 0x1f, /* PIO0-4 */
335         .mwdma_mask = 0x07, /* MWDMA0-2 */
336         .udma_mask = ATA_UDMA6,
337         .port_ops = &sas_sata_ops
338 };
339
340 int sas_ata_init_host_and_port(struct domain_device *found_dev,
341                                struct scsi_target *starget)
342 {
343         struct Scsi_Host *shost = dev_to_shost(&starget->dev);
344         struct sas_ha_struct *ha = SHOST_TO_SAS_HA(shost);
345         struct ata_port *ap;
346
347         ata_host_init(&found_dev->sata_dev.ata_host,
348                       &ha->pcidev->dev,
349                       sata_port_info.flags,
350                       &sas_sata_ops);
351         ap = ata_sas_port_alloc(&found_dev->sata_dev.ata_host,
352                                 &sata_port_info,
353                                 shost);
354         if (!ap) {
355                 SAS_DPRINTK("ata_sas_port_alloc failed.\n");
356                 return -ENODEV;
357         }
358
359         ap->private_data = found_dev;
360         ap->cbl = ATA_CBL_SATA;
361         ap->scsi_host = shost;
362         found_dev->sata_dev.ap = ap;
363
364         return 0;
365 }