linux/drivers/scsi/libsas/sas_scsi_host.c
<<
>>
Prefs
   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 <linux/kthread.h>
  27#include <linux/firmware.h>
  28#include <linux/export.h>
  29#include <linux/ctype.h>
  30
  31#include "sas_internal.h"
  32
  33#include <scsi/scsi_host.h>
  34#include <scsi/scsi_device.h>
  35#include <scsi/scsi_tcq.h>
  36#include <scsi/scsi.h>
  37#include <scsi/scsi_eh.h>
  38#include <scsi/scsi_transport.h>
  39#include <scsi/scsi_transport_sas.h>
  40#include <scsi/sas_ata.h>
  41#include "../scsi_sas_internal.h"
  42#include "../scsi_transport_api.h"
  43#include "../scsi_priv.h"
  44
  45#include <linux/err.h>
  46#include <linux/blkdev.h>
  47#include <linux/freezer.h>
  48#include <linux/gfp.h>
  49#include <linux/scatterlist.h>
  50#include <linux/libata.h>
  51
  52/* record final status and free the task */
  53static void sas_end_task(struct scsi_cmnd *sc, struct sas_task *task)
  54{
  55        struct task_status_struct *ts = &task->task_status;
  56        int hs = 0, stat = 0;
  57
  58        if (ts->resp == SAS_TASK_UNDELIVERED) {
  59                /* transport error */
  60                hs = DID_NO_CONNECT;
  61        } else { /* ts->resp == SAS_TASK_COMPLETE */
  62                /* task delivered, what happened afterwards? */
  63                switch (ts->stat) {
  64                case SAS_DEV_NO_RESPONSE:
  65                case SAS_INTERRUPTED:
  66                case SAS_PHY_DOWN:
  67                case SAS_NAK_R_ERR:
  68                case SAS_OPEN_TO:
  69                        hs = DID_NO_CONNECT;
  70                        break;
  71                case SAS_DATA_UNDERRUN:
  72                        scsi_set_resid(sc, ts->residual);
  73                        if (scsi_bufflen(sc) - scsi_get_resid(sc) < sc->underflow)
  74                                hs = DID_ERROR;
  75                        break;
  76                case SAS_DATA_OVERRUN:
  77                        hs = DID_ERROR;
  78                        break;
  79                case SAS_QUEUE_FULL:
  80                        hs = DID_SOFT_ERROR; /* retry */
  81                        break;
  82                case SAS_DEVICE_UNKNOWN:
  83                        hs = DID_BAD_TARGET;
  84                        break;
  85                case SAS_SG_ERR:
  86                        hs = DID_PARITY;
  87                        break;
  88                case SAS_OPEN_REJECT:
  89                        if (ts->open_rej_reason == SAS_OREJ_RSVD_RETRY)
  90                                hs = DID_SOFT_ERROR; /* retry */
  91                        else
  92                                hs = DID_ERROR;
  93                        break;
  94                case SAS_PROTO_RESPONSE:
  95                        SAS_DPRINTK("LLDD:%s sent SAS_PROTO_RESP for an SSP "
  96                                    "task; please report this\n",
  97                                    task->dev->port->ha->sas_ha_name);
  98                        break;
  99                case SAS_ABORTED_TASK:
 100                        hs = DID_ABORT;
 101                        break;
 102                case SAM_STAT_CHECK_CONDITION:
 103                        memcpy(sc->sense_buffer, ts->buf,
 104                               min(SCSI_SENSE_BUFFERSIZE, ts->buf_valid_size));
 105                        stat = SAM_STAT_CHECK_CONDITION;
 106                        break;
 107                default:
 108                        stat = ts->stat;
 109                        break;
 110                }
 111        }
 112
 113        sc->result = (hs << 16) | stat;
 114        ASSIGN_SAS_TASK(sc, NULL);
 115        sas_free_task(task);
 116}
 117
 118static void sas_scsi_task_done(struct sas_task *task)
 119{
 120        struct scsi_cmnd *sc = task->uldd_task;
 121        struct domain_device *dev = task->dev;
 122        struct sas_ha_struct *ha = dev->port->ha;
 123        unsigned long flags;
 124
 125        spin_lock_irqsave(&dev->done_lock, flags);
 126        if (test_bit(SAS_HA_FROZEN, &ha->state))
 127                task = NULL;
 128        else
 129                ASSIGN_SAS_TASK(sc, NULL);
 130        spin_unlock_irqrestore(&dev->done_lock, flags);
 131
 132        if (unlikely(!task)) {
 133                /* task will be completed by the error handler */
 134                SAS_DPRINTK("task done but aborted\n");
 135                return;
 136        }
 137
 138        if (unlikely(!sc)) {
 139                SAS_DPRINTK("task_done called with non existing SCSI cmnd!\n");
 140                sas_free_task(task);
 141                return;
 142        }
 143
 144        sas_end_task(sc, task);
 145        sc->scsi_done(sc);
 146}
 147
 148static struct sas_task *sas_create_task(struct scsi_cmnd *cmd,
 149                                               struct domain_device *dev,
 150                                               gfp_t gfp_flags)
 151{
 152        struct sas_task *task = sas_alloc_task(gfp_flags);
 153        struct scsi_lun lun;
 154
 155        if (!task)
 156                return NULL;
 157
 158        task->uldd_task = cmd;
 159        ASSIGN_SAS_TASK(cmd, task);
 160
 161        task->dev = dev;
 162        task->task_proto = task->dev->tproto; /* BUG_ON(!SSP) */
 163
 164        task->ssp_task.retry_count = 1;
 165        int_to_scsilun(cmd->device->lun, &lun);
 166        memcpy(task->ssp_task.LUN, &lun.scsi_lun, 8);
 167        task->ssp_task.task_attr = TASK_ATTR_SIMPLE;
 168        task->ssp_task.cmd = cmd;
 169
 170        task->scatter = scsi_sglist(cmd);
 171        task->num_scatter = scsi_sg_count(cmd);
 172        task->total_xfer_len = scsi_bufflen(cmd);
 173        task->data_dir = cmd->sc_data_direction;
 174
 175        task->task_done = sas_scsi_task_done;
 176
 177        return task;
 178}
 179
 180int sas_queuecommand(struct Scsi_Host *host, struct scsi_cmnd *cmd)
 181{
 182        struct sas_internal *i = to_sas_internal(host->transportt);
 183        struct domain_device *dev = cmd_to_domain_dev(cmd);
 184        struct sas_task *task;
 185        int res = 0;
 186
 187        /* If the device fell off, no sense in issuing commands */
 188        if (test_bit(SAS_DEV_GONE, &dev->state)) {
 189                cmd->result = DID_BAD_TARGET << 16;
 190                goto out_done;
 191        }
 192
 193        if (dev_is_sata(dev)) {
 194                spin_lock_irq(dev->sata_dev.ap->lock);
 195                res = ata_sas_queuecmd(cmd, dev->sata_dev.ap);
 196                spin_unlock_irq(dev->sata_dev.ap->lock);
 197                return res;
 198        }
 199
 200        task = sas_create_task(cmd, dev, GFP_ATOMIC);
 201        if (!task)
 202                return SCSI_MLQUEUE_HOST_BUSY;
 203
 204        res = i->dft->lldd_execute_task(task, GFP_ATOMIC);
 205        if (res)
 206                goto out_free_task;
 207        return 0;
 208
 209out_free_task:
 210        SAS_DPRINTK("lldd_execute_task returned: %d\n", res);
 211        ASSIGN_SAS_TASK(cmd, NULL);
 212        sas_free_task(task);
 213        if (res == -SAS_QUEUE_FULL)
 214                cmd->result = DID_SOFT_ERROR << 16; /* retry */
 215        else
 216                cmd->result = DID_ERROR << 16;
 217out_done:
 218        cmd->scsi_done(cmd);
 219        return 0;
 220}
 221
 222static void sas_eh_finish_cmd(struct scsi_cmnd *cmd)
 223{
 224        struct sas_ha_struct *sas_ha = SHOST_TO_SAS_HA(cmd->device->host);
 225        struct sas_task *task = TO_SAS_TASK(cmd);
 226
 227        /* At this point, we only get called following an actual abort
 228         * of the task, so we should be guaranteed not to be racing with
 229         * any completions from the LLD.  Task is freed after this.
 230         */
 231        sas_end_task(cmd, task);
 232
 233        /* now finish the command and move it on to the error
 234         * handler done list, this also takes it off the
 235         * error handler pending list.
 236         */
 237        scsi_eh_finish_cmd(cmd, &sas_ha->eh_done_q);
 238}
 239
 240static void sas_eh_defer_cmd(struct scsi_cmnd *cmd)
 241{
 242        struct domain_device *dev = cmd_to_domain_dev(cmd);
 243        struct sas_ha_struct *ha = dev->port->ha;
 244        struct sas_task *task = TO_SAS_TASK(cmd);
 245
 246        if (!dev_is_sata(dev)) {
 247                sas_eh_finish_cmd(cmd);
 248                return;
 249        }
 250
 251        /* report the timeout to libata */
 252        sas_end_task(cmd, task);
 253        list_move_tail(&cmd->eh_entry, &ha->eh_ata_q);
 254}
 255
 256static void sas_scsi_clear_queue_lu(struct list_head *error_q, struct scsi_cmnd *my_cmd)
 257{
 258        struct scsi_cmnd *cmd, *n;
 259
 260        list_for_each_entry_safe(cmd, n, error_q, eh_entry) {
 261                if (cmd->device->sdev_target == my_cmd->device->sdev_target &&
 262                    cmd->device->lun == my_cmd->device->lun)
 263                        sas_eh_defer_cmd(cmd);
 264        }
 265}
 266
 267static void sas_scsi_clear_queue_I_T(struct list_head *error_q,
 268                                     struct domain_device *dev)
 269{
 270        struct scsi_cmnd *cmd, *n;
 271
 272        list_for_each_entry_safe(cmd, n, error_q, eh_entry) {
 273                struct domain_device *x = cmd_to_domain_dev(cmd);
 274
 275                if (x == dev)
 276                        sas_eh_finish_cmd(cmd);
 277        }
 278}
 279
 280static void sas_scsi_clear_queue_port(struct list_head *error_q,
 281                                      struct asd_sas_port *port)
 282{
 283        struct scsi_cmnd *cmd, *n;
 284
 285        list_for_each_entry_safe(cmd, n, error_q, eh_entry) {
 286                struct domain_device *dev = cmd_to_domain_dev(cmd);
 287                struct asd_sas_port *x = dev->port;
 288
 289                if (x == port)
 290                        sas_eh_finish_cmd(cmd);
 291        }
 292}
 293
 294enum task_disposition {
 295        TASK_IS_DONE,
 296        TASK_IS_ABORTED,
 297        TASK_IS_AT_LU,
 298        TASK_IS_NOT_AT_LU,
 299        TASK_ABORT_FAILED,
 300};
 301
 302static enum task_disposition sas_scsi_find_task(struct sas_task *task)
 303{
 304        unsigned long flags;
 305        int i, res;
 306        struct sas_internal *si =
 307                to_sas_internal(task->dev->port->ha->core.shost->transportt);
 308
 309        for (i = 0; i < 5; i++) {
 310                SAS_DPRINTK("%s: aborting task 0x%p\n", __func__, task);
 311                res = si->dft->lldd_abort_task(task);
 312
 313                spin_lock_irqsave(&task->task_state_lock, flags);
 314                if (task->task_state_flags & SAS_TASK_STATE_DONE) {
 315                        spin_unlock_irqrestore(&task->task_state_lock, flags);
 316                        SAS_DPRINTK("%s: task 0x%p is done\n", __func__,
 317                                    task);
 318                        return TASK_IS_DONE;
 319                }
 320                spin_unlock_irqrestore(&task->task_state_lock, flags);
 321
 322                if (res == TMF_RESP_FUNC_COMPLETE) {
 323                        SAS_DPRINTK("%s: task 0x%p is aborted\n",
 324                                    __func__, task);
 325                        return TASK_IS_ABORTED;
 326                } else if (si->dft->lldd_query_task) {
 327                        SAS_DPRINTK("%s: querying task 0x%p\n",
 328                                    __func__, task);
 329                        res = si->dft->lldd_query_task(task);
 330                        switch (res) {
 331                        case TMF_RESP_FUNC_SUCC:
 332                                SAS_DPRINTK("%s: task 0x%p at LU\n",
 333                                            __func__, task);
 334                                return TASK_IS_AT_LU;
 335                        case TMF_RESP_FUNC_COMPLETE:
 336                                SAS_DPRINTK("%s: task 0x%p not at LU\n",
 337                                            __func__, task);
 338                                return TASK_IS_NOT_AT_LU;
 339                        case TMF_RESP_FUNC_FAILED:
 340                                SAS_DPRINTK("%s: task 0x%p failed to abort\n",
 341                                                __func__, task);
 342                                return TASK_ABORT_FAILED;
 343                        }
 344
 345                }
 346        }
 347        return res;
 348}
 349
 350static int sas_recover_lu(struct domain_device *dev, struct scsi_cmnd *cmd)
 351{
 352        int res = TMF_RESP_FUNC_FAILED;
 353        struct scsi_lun lun;
 354        struct sas_internal *i =
 355                to_sas_internal(dev->port->ha->core.shost->transportt);
 356
 357        int_to_scsilun(cmd->device->lun, &lun);
 358
 359        SAS_DPRINTK("eh: device %llx LUN %llx has the task\n",
 360                    SAS_ADDR(dev->sas_addr),
 361                    cmd->device->lun);
 362
 363        if (i->dft->lldd_abort_task_set)
 364                res = i->dft->lldd_abort_task_set(dev, lun.scsi_lun);
 365
 366        if (res == TMF_RESP_FUNC_FAILED) {
 367                if (i->dft->lldd_clear_task_set)
 368                        res = i->dft->lldd_clear_task_set(dev, lun.scsi_lun);
 369        }
 370
 371        if (res == TMF_RESP_FUNC_FAILED) {
 372                if (i->dft->lldd_lu_reset)
 373                        res = i->dft->lldd_lu_reset(dev, lun.scsi_lun);
 374        }
 375
 376        return res;
 377}
 378
 379static int sas_recover_I_T(struct domain_device *dev)
 380{
 381        int res = TMF_RESP_FUNC_FAILED;
 382        struct sas_internal *i =
 383                to_sas_internal(dev->port->ha->core.shost->transportt);
 384
 385        SAS_DPRINTK("I_T nexus reset for dev %016llx\n",
 386                    SAS_ADDR(dev->sas_addr));
 387
 388        if (i->dft->lldd_I_T_nexus_reset)
 389                res = i->dft->lldd_I_T_nexus_reset(dev);
 390
 391        return res;
 392}
 393
 394/* take a reference on the last known good phy for this device */
 395struct sas_phy *sas_get_local_phy(struct domain_device *dev)
 396{
 397        struct sas_ha_struct *ha = dev->port->ha;
 398        struct sas_phy *phy;
 399        unsigned long flags;
 400
 401        /* a published domain device always has a valid phy, it may be
 402         * stale, but it is never NULL
 403         */
 404        BUG_ON(!dev->phy);
 405
 406        spin_lock_irqsave(&ha->phy_port_lock, flags);
 407        phy = dev->phy;
 408        get_device(&phy->dev);
 409        spin_unlock_irqrestore(&ha->phy_port_lock, flags);
 410
 411        return phy;
 412}
 413EXPORT_SYMBOL_GPL(sas_get_local_phy);
 414
 415static void sas_wait_eh(struct domain_device *dev)
 416{
 417        struct sas_ha_struct *ha = dev->port->ha;
 418        DEFINE_WAIT(wait);
 419
 420        if (dev_is_sata(dev)) {
 421                ata_port_wait_eh(dev->sata_dev.ap);
 422                return;
 423        }
 424 retry:
 425        spin_lock_irq(&ha->lock);
 426
 427        while (test_bit(SAS_DEV_EH_PENDING, &dev->state)) {
 428                prepare_to_wait(&ha->eh_wait_q, &wait, TASK_UNINTERRUPTIBLE);
 429                spin_unlock_irq(&ha->lock);
 430                schedule();
 431                spin_lock_irq(&ha->lock);
 432        }
 433        finish_wait(&ha->eh_wait_q, &wait);
 434
 435        spin_unlock_irq(&ha->lock);
 436
 437        /* make sure SCSI EH is complete */
 438        if (scsi_host_in_recovery(ha->core.shost)) {
 439                msleep(10);
 440                goto retry;
 441        }
 442}
 443EXPORT_SYMBOL(sas_wait_eh);
 444
 445static int sas_queue_reset(struct domain_device *dev, int reset_type,
 446                           u64 lun, int wait)
 447{
 448        struct sas_ha_struct *ha = dev->port->ha;
 449        int scheduled = 0, tries = 100;
 450
 451        /* ata: promote lun reset to bus reset */
 452        if (dev_is_sata(dev)) {
 453                sas_ata_schedule_reset(dev);
 454                if (wait)
 455                        sas_ata_wait_eh(dev);
 456                return SUCCESS;
 457        }
 458
 459        while (!scheduled && tries--) {
 460                spin_lock_irq(&ha->lock);
 461                if (!test_bit(SAS_DEV_EH_PENDING, &dev->state) &&
 462                    !test_bit(reset_type, &dev->state)) {
 463                        scheduled = 1;
 464                        ha->eh_active++;
 465                        list_add_tail(&dev->ssp_dev.eh_list_node, &ha->eh_dev_q);
 466                        set_bit(SAS_DEV_EH_PENDING, &dev->state);
 467                        set_bit(reset_type, &dev->state);
 468                        int_to_scsilun(lun, &dev->ssp_dev.reset_lun);
 469                        scsi_schedule_eh(ha->core.shost);
 470                }
 471                spin_unlock_irq(&ha->lock);
 472
 473                if (wait)
 474                        sas_wait_eh(dev);
 475
 476                if (scheduled)
 477                        return SUCCESS;
 478        }
 479
 480        SAS_DPRINTK("%s reset of %s failed\n",
 481                    reset_type == SAS_DEV_LU_RESET ? "LUN" : "Bus",
 482                    dev_name(&dev->rphy->dev));
 483
 484        return FAILED;
 485}
 486
 487int sas_eh_abort_handler(struct scsi_cmnd *cmd)
 488{
 489        int res = TMF_RESP_FUNC_FAILED;
 490        struct sas_task *task = TO_SAS_TASK(cmd);
 491        struct Scsi_Host *host = cmd->device->host;
 492        struct domain_device *dev = cmd_to_domain_dev(cmd);
 493        struct sas_internal *i = to_sas_internal(host->transportt);
 494        unsigned long flags;
 495
 496        if (!i->dft->lldd_abort_task)
 497                return FAILED;
 498
 499        spin_lock_irqsave(host->host_lock, flags);
 500        /* We cannot do async aborts for SATA devices */
 501        if (dev_is_sata(dev) && !host->host_eh_scheduled) {
 502                spin_unlock_irqrestore(host->host_lock, flags);
 503                return FAILED;
 504        }
 505        spin_unlock_irqrestore(host->host_lock, flags);
 506
 507        if (task)
 508                res = i->dft->lldd_abort_task(task);
 509        else
 510                SAS_DPRINTK("no task to abort\n");
 511        if (res == TMF_RESP_FUNC_SUCC || res == TMF_RESP_FUNC_COMPLETE)
 512                return SUCCESS;
 513
 514        return FAILED;
 515}
 516EXPORT_SYMBOL_GPL(sas_eh_abort_handler);
 517
 518/* Attempt to send a LUN reset message to a device */
 519int sas_eh_device_reset_handler(struct scsi_cmnd *cmd)
 520{
 521        int res;
 522        struct scsi_lun lun;
 523        struct Scsi_Host *host = cmd->device->host;
 524        struct domain_device *dev = cmd_to_domain_dev(cmd);
 525        struct sas_internal *i = to_sas_internal(host->transportt);
 526
 527        if (current != host->ehandler)
 528                return sas_queue_reset(dev, SAS_DEV_LU_RESET, cmd->device->lun, 0);
 529
 530        int_to_scsilun(cmd->device->lun, &lun);
 531
 532        if (!i->dft->lldd_lu_reset)
 533                return FAILED;
 534
 535        res = i->dft->lldd_lu_reset(dev, lun.scsi_lun);
 536        if (res == TMF_RESP_FUNC_SUCC || res == TMF_RESP_FUNC_COMPLETE)
 537                return SUCCESS;
 538
 539        return FAILED;
 540}
 541
 542int sas_eh_target_reset_handler(struct scsi_cmnd *cmd)
 543{
 544        int res;
 545        struct Scsi_Host *host = cmd->device->host;
 546        struct domain_device *dev = cmd_to_domain_dev(cmd);
 547        struct sas_internal *i = to_sas_internal(host->transportt);
 548
 549        if (current != host->ehandler)
 550                return sas_queue_reset(dev, SAS_DEV_RESET, 0, 0);
 551
 552        if (!i->dft->lldd_I_T_nexus_reset)
 553                return FAILED;
 554
 555        res = i->dft->lldd_I_T_nexus_reset(dev);
 556        if (res == TMF_RESP_FUNC_SUCC || res == TMF_RESP_FUNC_COMPLETE ||
 557            res == -ENODEV)
 558                return SUCCESS;
 559
 560        return FAILED;
 561}
 562
 563/* Try to reset a device */
 564static int try_to_reset_cmd_device(struct scsi_cmnd *cmd)
 565{
 566        int res;
 567        struct Scsi_Host *shost = cmd->device->host;
 568
 569        if (!shost->hostt->eh_device_reset_handler)
 570                goto try_target_reset;
 571
 572        res = shost->hostt->eh_device_reset_handler(cmd);
 573        if (res == SUCCESS)
 574                return res;
 575
 576try_target_reset:
 577        if (shost->hostt->eh_target_reset_handler)
 578                return shost->hostt->eh_target_reset_handler(cmd);
 579
 580        return FAILED;
 581}
 582
 583static void sas_eh_handle_sas_errors(struct Scsi_Host *shost, struct list_head *work_q)
 584{
 585        struct scsi_cmnd *cmd, *n;
 586        enum task_disposition res = TASK_IS_DONE;
 587        int tmf_resp, need_reset;
 588        struct sas_internal *i = to_sas_internal(shost->transportt);
 589        unsigned long flags;
 590        struct sas_ha_struct *ha = SHOST_TO_SAS_HA(shost);
 591        LIST_HEAD(done);
 592
 593        /* clean out any commands that won the completion vs eh race */
 594        list_for_each_entry_safe(cmd, n, work_q, eh_entry) {
 595                struct domain_device *dev = cmd_to_domain_dev(cmd);
 596                struct sas_task *task;
 597
 598                spin_lock_irqsave(&dev->done_lock, flags);
 599                /* by this point the lldd has either observed
 600                 * SAS_HA_FROZEN and is leaving the task alone, or has
 601                 * won the race with eh and decided to complete it
 602                 */
 603                task = TO_SAS_TASK(cmd);
 604                spin_unlock_irqrestore(&dev->done_lock, flags);
 605
 606                if (!task)
 607                        list_move_tail(&cmd->eh_entry, &done);
 608        }
 609
 610 Again:
 611        list_for_each_entry_safe(cmd, n, work_q, eh_entry) {
 612                struct sas_task *task = TO_SAS_TASK(cmd);
 613
 614                list_del_init(&cmd->eh_entry);
 615
 616                spin_lock_irqsave(&task->task_state_lock, flags);
 617                need_reset = task->task_state_flags & SAS_TASK_NEED_DEV_RESET;
 618                spin_unlock_irqrestore(&task->task_state_lock, flags);
 619
 620                if (need_reset) {
 621                        SAS_DPRINTK("%s: task 0x%p requests reset\n",
 622                                    __func__, task);
 623                        goto reset;
 624                }
 625
 626                SAS_DPRINTK("trying to find task 0x%p\n", task);
 627                res = sas_scsi_find_task(task);
 628
 629                switch (res) {
 630                case TASK_IS_DONE:
 631                        SAS_DPRINTK("%s: task 0x%p is done\n", __func__,
 632                                    task);
 633                        sas_eh_defer_cmd(cmd);
 634                        continue;
 635                case TASK_IS_ABORTED:
 636                        SAS_DPRINTK("%s: task 0x%p is aborted\n",
 637                                    __func__, task);
 638                        sas_eh_defer_cmd(cmd);
 639                        continue;
 640                case TASK_IS_AT_LU:
 641                        SAS_DPRINTK("task 0x%p is at LU: lu recover\n", task);
 642 reset:
 643                        tmf_resp = sas_recover_lu(task->dev, cmd);
 644                        if (tmf_resp == TMF_RESP_FUNC_COMPLETE) {
 645                                SAS_DPRINTK("dev %016llx LU %llx is "
 646                                            "recovered\n",
 647                                            SAS_ADDR(task->dev),
 648                                            cmd->device->lun);
 649                                sas_eh_defer_cmd(cmd);
 650                                sas_scsi_clear_queue_lu(work_q, cmd);
 651                                goto Again;
 652                        }
 653                        /* fallthrough */
 654                case TASK_IS_NOT_AT_LU:
 655                case TASK_ABORT_FAILED:
 656                        SAS_DPRINTK("task 0x%p is not at LU: I_T recover\n",
 657                                    task);
 658                        tmf_resp = sas_recover_I_T(task->dev);
 659                        if (tmf_resp == TMF_RESP_FUNC_COMPLETE ||
 660                            tmf_resp == -ENODEV) {
 661                                struct domain_device *dev = task->dev;
 662                                SAS_DPRINTK("I_T %016llx recovered\n",
 663                                            SAS_ADDR(task->dev->sas_addr));
 664                                sas_eh_finish_cmd(cmd);
 665                                sas_scsi_clear_queue_I_T(work_q, dev);
 666                                goto Again;
 667                        }
 668                        /* Hammer time :-) */
 669                        try_to_reset_cmd_device(cmd);
 670                        if (i->dft->lldd_clear_nexus_port) {
 671                                struct asd_sas_port *port = task->dev->port;
 672                                SAS_DPRINTK("clearing nexus for port:%d\n",
 673                                            port->id);
 674                                res = i->dft->lldd_clear_nexus_port(port);
 675                                if (res == TMF_RESP_FUNC_COMPLETE) {
 676                                        SAS_DPRINTK("clear nexus port:%d "
 677                                                    "succeeded\n", port->id);
 678                                        sas_eh_finish_cmd(cmd);
 679                                        sas_scsi_clear_queue_port(work_q,
 680                                                                  port);
 681                                        goto Again;
 682                                }
 683                        }
 684                        if (i->dft->lldd_clear_nexus_ha) {
 685                                SAS_DPRINTK("clear nexus ha\n");
 686                                res = i->dft->lldd_clear_nexus_ha(ha);
 687                                if (res == TMF_RESP_FUNC_COMPLETE) {
 688                                        SAS_DPRINTK("clear nexus ha "
 689                                                    "succeeded\n");
 690                                        sas_eh_finish_cmd(cmd);
 691                                        goto clear_q;
 692                                }
 693                        }
 694                        /* If we are here -- this means that no amount
 695                         * of effort could recover from errors.  Quite
 696                         * possibly the HA just disappeared.
 697                         */
 698                        SAS_DPRINTK("error from  device %llx, LUN %llx "
 699                                    "couldn't be recovered in any way\n",
 700                                    SAS_ADDR(task->dev->sas_addr),
 701                                    cmd->device->lun);
 702
 703                        sas_eh_finish_cmd(cmd);
 704                        goto clear_q;
 705                }
 706        }
 707 out:
 708        list_splice_tail(&done, work_q);
 709        list_splice_tail_init(&ha->eh_ata_q, work_q);
 710        return;
 711
 712 clear_q:
 713        SAS_DPRINTK("--- Exit %s -- clear_q\n", __func__);
 714        list_for_each_entry_safe(cmd, n, work_q, eh_entry)
 715                sas_eh_finish_cmd(cmd);
 716        goto out;
 717}
 718
 719static void sas_eh_handle_resets(struct Scsi_Host *shost)
 720{
 721        struct sas_ha_struct *ha = SHOST_TO_SAS_HA(shost);
 722        struct sas_internal *i = to_sas_internal(shost->transportt);
 723
 724        /* handle directed resets to sas devices */
 725        spin_lock_irq(&ha->lock);
 726        while (!list_empty(&ha->eh_dev_q)) {
 727                struct domain_device *dev;
 728                struct ssp_device *ssp;
 729
 730                ssp = list_entry(ha->eh_dev_q.next, typeof(*ssp), eh_list_node);
 731                list_del_init(&ssp->eh_list_node);
 732                dev = container_of(ssp, typeof(*dev), ssp_dev);
 733                kref_get(&dev->kref);
 734                WARN_ONCE(dev_is_sata(dev), "ssp reset to ata device?\n");
 735
 736                spin_unlock_irq(&ha->lock);
 737
 738                if (test_and_clear_bit(SAS_DEV_LU_RESET, &dev->state))
 739                        i->dft->lldd_lu_reset(dev, ssp->reset_lun.scsi_lun);
 740
 741                if (test_and_clear_bit(SAS_DEV_RESET, &dev->state))
 742                        i->dft->lldd_I_T_nexus_reset(dev);
 743
 744                sas_put_device(dev);
 745                spin_lock_irq(&ha->lock);
 746                clear_bit(SAS_DEV_EH_PENDING, &dev->state);
 747                ha->eh_active--;
 748        }
 749        spin_unlock_irq(&ha->lock);
 750}
 751
 752
 753void sas_scsi_recover_host(struct Scsi_Host *shost)
 754{
 755        struct sas_ha_struct *ha = SHOST_TO_SAS_HA(shost);
 756        LIST_HEAD(eh_work_q);
 757        int tries = 0;
 758        bool retry;
 759
 760retry:
 761        tries++;
 762        retry = true;
 763        spin_lock_irq(shost->host_lock);
 764        list_splice_init(&shost->eh_cmd_q, &eh_work_q);
 765        spin_unlock_irq(shost->host_lock);
 766
 767        SAS_DPRINTK("Enter %s busy: %d failed: %d\n",
 768                    __func__, atomic_read(&shost->host_busy), shost->host_failed);
 769        /*
 770         * Deal with commands that still have SAS tasks (i.e. they didn't
 771         * complete via the normal sas_task completion mechanism),
 772         * SAS_HA_FROZEN gives eh dominion over all sas_task completion.
 773         */
 774        set_bit(SAS_HA_FROZEN, &ha->state);
 775        sas_eh_handle_sas_errors(shost, &eh_work_q);
 776        clear_bit(SAS_HA_FROZEN, &ha->state);
 777        if (list_empty(&eh_work_q))
 778                goto out;
 779
 780        /*
 781         * Now deal with SCSI commands that completed ok but have a an error
 782         * code (and hopefully sense data) attached.  This is roughly what
 783         * scsi_unjam_host does, but we skip scsi_eh_abort_cmds because any
 784         * command we see here has no sas_task and is thus unknown to the HA.
 785         */
 786        sas_ata_eh(shost, &eh_work_q, &ha->eh_done_q);
 787        if (!scsi_eh_get_sense(&eh_work_q, &ha->eh_done_q))
 788                scsi_eh_ready_devs(shost, &eh_work_q, &ha->eh_done_q);
 789
 790out:
 791        sas_eh_handle_resets(shost);
 792
 793        /* now link into libata eh --- if we have any ata devices */
 794        sas_ata_strategy_handler(shost);
 795
 796        scsi_eh_flush_done_q(&ha->eh_done_q);
 797
 798        /* check if any new eh work was scheduled during the last run */
 799        spin_lock_irq(&ha->lock);
 800        if (ha->eh_active == 0) {
 801                shost->host_eh_scheduled = 0;
 802                retry = false;
 803        }
 804        spin_unlock_irq(&ha->lock);
 805
 806        if (retry)
 807                goto retry;
 808
 809        SAS_DPRINTK("--- Exit %s: busy: %d failed: %d tries: %d\n",
 810                    __func__, atomic_read(&shost->host_busy),
 811                    shost->host_failed, tries);
 812}
 813
 814int sas_ioctl(struct scsi_device *sdev, int cmd, void __user *arg)
 815{
 816        struct domain_device *dev = sdev_to_domain_dev(sdev);
 817
 818        if (dev_is_sata(dev))
 819                return ata_sas_scsi_ioctl(dev->sata_dev.ap, sdev, cmd, arg);
 820
 821        return -EINVAL;
 822}
 823
 824struct domain_device *sas_find_dev_by_rphy(struct sas_rphy *rphy)
 825{
 826        struct Scsi_Host *shost = dev_to_shost(rphy->dev.parent);
 827        struct sas_ha_struct *ha = SHOST_TO_SAS_HA(shost);
 828        struct domain_device *found_dev = NULL;
 829        int i;
 830        unsigned long flags;
 831
 832        spin_lock_irqsave(&ha->phy_port_lock, flags);
 833        for (i = 0; i < ha->num_phys; i++) {
 834                struct asd_sas_port *port = ha->sas_port[i];
 835                struct domain_device *dev;
 836
 837                spin_lock(&port->dev_list_lock);
 838                list_for_each_entry(dev, &port->dev_list, dev_list_node) {
 839                        if (rphy == dev->rphy) {
 840                                found_dev = dev;
 841                                spin_unlock(&port->dev_list_lock);
 842                                goto found;
 843                        }
 844                }
 845                spin_unlock(&port->dev_list_lock);
 846        }
 847 found:
 848        spin_unlock_irqrestore(&ha->phy_port_lock, flags);
 849
 850        return found_dev;
 851}
 852
 853int sas_target_alloc(struct scsi_target *starget)
 854{
 855        struct sas_rphy *rphy = dev_to_rphy(starget->dev.parent);
 856        struct domain_device *found_dev = sas_find_dev_by_rphy(rphy);
 857
 858        if (!found_dev)
 859                return -ENODEV;
 860
 861        kref_get(&found_dev->kref);
 862        starget->hostdata = found_dev;
 863        return 0;
 864}
 865
 866#define SAS_DEF_QD 256
 867
 868int sas_slave_configure(struct scsi_device *scsi_dev)
 869{
 870        struct domain_device *dev = sdev_to_domain_dev(scsi_dev);
 871
 872        BUG_ON(dev->rphy->identify.device_type != SAS_END_DEVICE);
 873
 874        if (dev_is_sata(dev)) {
 875                ata_sas_slave_configure(scsi_dev, dev->sata_dev.ap);
 876                return 0;
 877        }
 878
 879        sas_read_port_mode_page(scsi_dev);
 880
 881        if (scsi_dev->tagged_supported) {
 882                scsi_change_queue_depth(scsi_dev, SAS_DEF_QD);
 883        } else {
 884                SAS_DPRINTK("device %llx, LUN %llx doesn't support "
 885                            "TCQ\n", SAS_ADDR(dev->sas_addr),
 886                            scsi_dev->lun);
 887                scsi_change_queue_depth(scsi_dev, 1);
 888        }
 889
 890        scsi_dev->allow_restart = 1;
 891
 892        return 0;
 893}
 894
 895int sas_change_queue_depth(struct scsi_device *sdev, int depth)
 896{
 897        struct domain_device *dev = sdev_to_domain_dev(sdev);
 898
 899        if (dev_is_sata(dev))
 900                return __ata_change_queue_depth(dev->sata_dev.ap, sdev, depth);
 901
 902        if (!sdev->tagged_supported)
 903                depth = 1;
 904        return scsi_change_queue_depth(sdev, depth);
 905}
 906
 907int sas_bios_param(struct scsi_device *scsi_dev,
 908                          struct block_device *bdev,
 909                          sector_t capacity, int *hsc)
 910{
 911        hsc[0] = 255;
 912        hsc[1] = 63;
 913        sector_div(capacity, 255*63);
 914        hsc[2] = capacity;
 915
 916        return 0;
 917}
 918
 919/*
 920 * Tell an upper layer that it needs to initiate an abort for a given task.
 921 * This should only ever be called by an LLDD.
 922 */
 923void sas_task_abort(struct sas_task *task)
 924{
 925        struct scsi_cmnd *sc = task->uldd_task;
 926
 927        /* Escape for libsas internal commands */
 928        if (!sc) {
 929                struct sas_task_slow *slow = task->slow_task;
 930
 931                if (!slow)
 932                        return;
 933                if (!del_timer(&slow->timer))
 934                        return;
 935                slow->timer.function(&slow->timer);
 936                return;
 937        }
 938
 939        if (dev_is_sata(task->dev)) {
 940                sas_ata_task_abort(task);
 941        } else {
 942                struct request_queue *q = sc->device->request_queue;
 943                unsigned long flags;
 944
 945                spin_lock_irqsave(q->queue_lock, flags);
 946                blk_abort_request(sc->request);
 947                spin_unlock_irqrestore(q->queue_lock, flags);
 948        }
 949}
 950
 951void sas_target_destroy(struct scsi_target *starget)
 952{
 953        struct domain_device *found_dev = starget->hostdata;
 954
 955        if (!found_dev)
 956                return;
 957
 958        starget->hostdata = NULL;
 959        sas_put_device(found_dev);
 960}
 961
 962static void sas_parse_addr(u8 *sas_addr, const char *p)
 963{
 964        int i;
 965        for (i = 0; i < SAS_ADDR_SIZE; i++) {
 966                u8 h, l;
 967                if (!*p)
 968                        break;
 969                h = isdigit(*p) ? *p-'0' : toupper(*p)-'A'+10;
 970                p++;
 971                l = isdigit(*p) ? *p-'0' : toupper(*p)-'A'+10;
 972                p++;
 973                sas_addr[i] = (h<<4) | l;
 974        }
 975}
 976
 977#define SAS_STRING_ADDR_SIZE    16
 978
 979int sas_request_addr(struct Scsi_Host *shost, u8 *addr)
 980{
 981        int res;
 982        const struct firmware *fw;
 983
 984        res = request_firmware(&fw, "sas_addr", &shost->shost_gendev);
 985        if (res)
 986                return res;
 987
 988        if (fw->size < SAS_STRING_ADDR_SIZE) {
 989                res = -ENODEV;
 990                goto out;
 991        }
 992
 993        sas_parse_addr(addr, fw->data);
 994
 995out:
 996        release_firmware(fw);
 997        return res;
 998}
 999EXPORT_SYMBOL_GPL(sas_request_addr);
1000
1001EXPORT_SYMBOL_GPL(sas_queuecommand);
1002EXPORT_SYMBOL_GPL(sas_target_alloc);
1003EXPORT_SYMBOL_GPL(sas_slave_configure);
1004EXPORT_SYMBOL_GPL(sas_change_queue_depth);
1005EXPORT_SYMBOL_GPL(sas_bios_param);
1006EXPORT_SYMBOL_GPL(sas_task_abort);
1007EXPORT_SYMBOL_GPL(sas_phy_reset);
1008EXPORT_SYMBOL_GPL(sas_eh_device_reset_handler);
1009EXPORT_SYMBOL_GPL(sas_eh_target_reset_handler);
1010EXPORT_SYMBOL_GPL(sas_target_destroy);
1011EXPORT_SYMBOL_GPL(sas_ioctl);
1012