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         } else if (stat->stat != SAM_STAT_GOOD) {
 110                 ac = sas_to_ata_err(stat);
 111                 if (ac) {
 112                         SAS_DPRINTK("%s: SAS error %x\n", __FUNCTION__,
 113                                     stat->stat);
 114                         /* We saw a SAS error. Send a vague error. */
 115                         qc->err_mask = ac;
 116                         dev->sata_dev.tf.feature = 0x04; /* status err */
 117                         dev->sata_dev.tf.command = ATA_ERR;
 118                 }
 119         }
 120
 121         qc->lldd_task = NULL;
 122         ata_qc_complete(qc);
 123         spin_unlock_irqrestore(dev->sata_dev.ap->lock, flags);
 124
 125 qc_already_gone:
 126         list_del_init(&task->list);
 127         sas_free_task(task);
 128 }
 129
 130 static unsigned int sas_ata_qc_issue(struct ata_queued_cmd *qc)
 131 {
 132         int res;
 133         struct sas_task *task;
 134         struct domain_device *dev = qc->ap->private_data;
 135         struct sas_ha_struct *sas_ha = dev->port->ha;
 136         struct Scsi_Host *host = sas_ha->core.shost;
 137         struct sas_internal *i = to_sas_internal(host->transportt);
 138         struct scatterlist *sg;
 139         unsigned int num = 0;
 140         unsigned int xfer = 0;
 141
 142         task = sas_alloc_task(GFP_ATOMIC);
 143         if (!task)
 144                 return AC_ERR_SYSTEM;
 145         task->dev = dev;
 146         task->task_proto = SAS_PROTOCOL_STP;
 147         task->task_done = sas_ata_task_done;
 148
 149         if (qc->tf.command == ATA_CMD_FPDMA_WRITE ||
 150             qc->tf.command == ATA_CMD_FPDMA_READ) {
 151                 /* Need to zero out the tag libata assigned us */
 152                 qc->tf.nsect = 0;
 153         }
 154
 155         ata_tf_to_fis(&qc->tf, (u8*)&task->ata_task.fis, 0);
 156         task->uldd_task = qc;
 157         if (is_atapi_taskfile(&qc->tf)) {
 158                 memcpy(task->ata_task.atapi_packet, qc->cdb, qc->dev->cdb_len);
 159                 task->total_xfer_len = qc->nbytes + qc->pad_len;
 160                 task->num_scatter = qc->pad_len ? qc->n_elem + 1 : qc->n_elem;
 161         } else {
 162                 ata_for_each_sg(sg, qc) {
 163                         num++;
 164                         xfer += sg->length;
 165                 }
 166
 167                 task->total_xfer_len = xfer;
 168                 task->num_scatter = num;
 169         }
 170
 171         task->data_dir = qc->dma_dir;
 172         task->scatter = qc->__sg;
 173         task->ata_task.retry_count = 1;
 174         task->task_state_flags = SAS_TASK_STATE_PENDING;
 175         qc->lldd_task = task;
 176
 177         switch (qc->tf.protocol) {
 178         case ATA_PROT_NCQ:
 179                 task->ata_task.use_ncq = 1;
 180                 /* fall through */
 181         case ATA_PROT_ATAPI_DMA:
 182         case ATA_PROT_DMA:
 183                 task->ata_task.dma_xfer = 1;
 184                 break;
 185         }
 186
 187         if (sas_ha->lldd_max_execute_num < 2)
 188                 res = i->dft->lldd_execute_task(task, 1, GFP_ATOMIC);
 189         else
 190                 res = sas_queue_up(task);
 191
 192         /* Examine */
 193         if (res) {
 194                 SAS_DPRINTK("lldd_execute_task returned: %d\n", res);
 195
 196                 sas_free_task(task);
 197                 return AC_ERR_SYSTEM;
 198         }
 199
 200         return 0;
 201 }
 202
 203 static u8 sas_ata_check_status(struct ata_port *ap)
 204 {
 205         struct domain_device *dev = ap->private_data;
 206         return dev->sata_dev.tf.command;
 207 }
 208
 209 static void sas_ata_phy_reset(struct ata_port *ap)
 210 {
 211         struct domain_device *dev = ap->private_data;
 212         struct sas_internal *i =
 213                 to_sas_internal(dev->port->ha->core.shost->transportt);
 214         int res = 0;
 215
 216         if (i->dft->lldd_I_T_nexus_reset)
 217                 res = i->dft->lldd_I_T_nexus_reset(dev);
 218
 219         if (res)
 220                 SAS_DPRINTK("%s: Unable to reset I T nexus?\n", __FUNCTION__);
 221
 222         switch (dev->sata_dev.command_set) {
 223                 case ATA_COMMAND_SET:
 224                         SAS_DPRINTK("%s: Found ATA device.\n", __FUNCTION__);
 225                         ap->device[0].class = ATA_DEV_ATA;
 226                         break;
 227                 case ATAPI_COMMAND_SET:
 228                         SAS_DPRINTK("%s: Found ATAPI device.\n", __FUNCTION__);
 229                         ap->device[0].class = ATA_DEV_ATAPI;
 230                         break;
 231                 default:
 232                         SAS_DPRINTK("%s: Unknown SATA command set: %d.\n",
 233                                     __FUNCTION__,
 234                                     dev->sata_dev.command_set);
 235                         ap->device[0].class = ATA_DEV_ATA;
 236                         break;
 237         }
 238
 239         ap->cbl = ATA_CBL_SATA;
 240 }
 241
 242 static void sas_ata_post_internal(struct ata_queued_cmd *qc)
 243 {
 244         if (qc->flags & ATA_QCFLAG_FAILED)
 245                 qc->err_mask |= AC_ERR_OTHER;
 246
 247         if (qc->err_mask) {
 248                 /*
 249                  * Find the sas_task and kill it.  By this point,
 250                  * libata has decided to kill the qc, so we needn't
 251                  * bother with sas_ata_task_done.  But we still
 252                  * ought to abort the task.
 253                  */
 254                 struct sas_task *task = qc->lldd_task;
 255                 struct domain_device *dev = qc->ap->private_data;
 256
 257                 qc->lldd_task = NULL;
 258                 if (task) {
 259                         task->uldd_task = NULL;
 260                         __sas_task_abort(task);
 261                 }
 262
 263                 sas_phy_reset(dev->port->phy, 1);
 264         }
 265 }
 266
 267 static void sas_ata_tf_read(struct ata_port *ap, struct ata_taskfile *tf)
 268 {
 269         struct domain_device *dev = ap->private_data;
 270         memcpy(tf, &dev->sata_dev.tf, sizeof (*tf));
 271 }
 272
 273 static void sas_ata_scr_write(struct ata_port *ap, unsigned int sc_reg_in,
 274                               u32 val)
 275 {
 276         struct domain_device *dev = ap->private_data;
 277
 278         SAS_DPRINTK("STUB %s\n", __FUNCTION__);
 279         switch (sc_reg_in) {
 280                 case SCR_STATUS:
 281                         dev->sata_dev.sstatus = val;
 282                         break;
 283                 case SCR_CONTROL:
 284                         dev->sata_dev.scontrol = val;
 285                         break;
 286                 case SCR_ERROR:
 287                         dev->sata_dev.serror = val;
 288                         break;
 289                 case SCR_ACTIVE:
 290                         dev->sata_dev.ap->sactive = val;
 291                         break;
 292         }
 293 }
 294
 295 static u32 sas_ata_scr_read(struct ata_port *ap, unsigned int sc_reg_in)
 296 {
 297         struct domain_device *dev = ap->private_data;
 298
 299         SAS_DPRINTK("STUB %s\n", __FUNCTION__);
 300         switch (sc_reg_in) {
 301                 case SCR_STATUS:
 302                         return dev->sata_dev.sstatus;
 303                 case SCR_CONTROL:
 304                         return dev->sata_dev.scontrol;
 305                 case SCR_ERROR:
 306                         return dev->sata_dev.serror;
 307                 case SCR_ACTIVE:
 308                         return dev->sata_dev.ap->sactive;
 309                 default:
 310                         return 0xffffffffU;
 311         }
 312 }
 313
 314 static struct ata_port_operations sas_sata_ops = {
 315         .port_disable           = ata_port_disable,
 316         .check_status           = sas_ata_check_status,
 317         .check_altstatus        = sas_ata_check_status,
 318         .dev_select             = ata_noop_dev_select,
 319         .phy_reset              = sas_ata_phy_reset,
 320         .post_internal_cmd      = sas_ata_post_internal,
 321         .tf_read                = sas_ata_tf_read,
 322         .qc_prep                = ata_noop_qc_prep,
 323         .qc_issue               = sas_ata_qc_issue,
 324         .port_start             = ata_sas_port_start,
 325         .port_stop              = ata_sas_port_stop,
 326         .scr_read               = sas_ata_scr_read,
 327         .scr_write              = sas_ata_scr_write
 328 };
 329
 330 static struct ata_port_info sata_port_info = {
 331         .flags = ATA_FLAG_SATA | ATA_FLAG_NO_LEGACY | ATA_FLAG_SATA_RESET |
 332                 ATA_FLAG_MMIO | ATA_FLAG_PIO_DMA | ATA_FLAG_NCQ,
 333         .pio_mask = 0x1f, /* PIO0-4 */
 334         .mwdma_mask = 0x07, /* MWDMA0-2 */
 335         .udma_mask = ATA_UDMA6,
 336         .port_ops = &sas_sata_ops
 337 };
 338
 339 int sas_ata_init_host_and_port(struct domain_device *found_dev,
 340                                struct scsi_target *starget)
 341 {
 342         struct Scsi_Host *shost = dev_to_shost(&starget->dev);
 343         struct sas_ha_struct *ha = SHOST_TO_SAS_HA(shost);
 344         struct ata_port *ap;
 345
 346         ata_host_init(&found_dev->sata_dev.ata_host,
 347                       &ha->pcidev->dev,
 348                       sata_port_info.flags,
 349                       &sas_sata_ops);
 350         ap = ata_sas_port_alloc(&found_dev->sata_dev.ata_host,
 351                                 &sata_port_info,
 352                                 shost);
 353         if (!ap) {
 354                 SAS_DPRINTK("ata_sas_port_alloc failed.\n");
 355                 return -ENODEV;
 356         }
 357
 358         ap->private_data = found_dev;
 359         ap->cbl = ATA_CBL_SATA;
 360         ap->scsi_host = shost;
 361         found_dev->sata_dev.ap = ap;
 362
 363         return 0;
 364 }