LXR linux/drivers/scsi/libsas/sas_host

   1/*
   2 * Serial Attached SCSI (SAS) Expander discovery and configuration
   3 *
   4 * Copyright (C) 2007 James E.J. Bottomley
   5 *              <James.Bottomley@HansenPartnership.com>
   6 *
   7 * This program is free software; you can redistribute it and/or
   8 * modify it under the terms of the GNU General Public License as
   9 * published by the Free Software Foundation; version 2 only.
  10 */
  11#include <linux/scatterlist.h>
  12#include <linux/blkdev.h>
  13#include <linux/slab.h>
  14#include <linux/export.h>
  15
  16#include "sas_internal.h"
  17
  18#include <scsi/scsi_transport.h>
  19#include <scsi/scsi_transport_sas.h>
  20#include "../scsi_sas_internal.h"
  21
  22static void sas_host_smp_discover(struct sas_ha_struct *sas_ha, u8 *resp_data,
  23                                  u8 phy_id)
  24{
  25        struct sas_phy *phy;
  26        struct sas_rphy *rphy;
  27
  28        if (phy_id >= sas_ha->num_phys) {
  29                resp_data[2] = SMP_RESP_NO_PHY;
  30                return;
  31        }
  32        resp_data[2] = SMP_RESP_FUNC_ACC;
  33
  34        phy = sas_ha->sas_phy[phy_id]->phy;
  35        resp_data[9] = phy_id;
  36        resp_data[13] = phy->negotiated_linkrate;
  37        memcpy(resp_data + 16, sas_ha->sas_addr, SAS_ADDR_SIZE);
  38        memcpy(resp_data + 24, sas_ha->sas_phy[phy_id]->attached_sas_addr,
  39               SAS_ADDR_SIZE);
  40        resp_data[40] = (phy->minimum_linkrate << 4) |
  41                phy->minimum_linkrate_hw;
  42        resp_data[41] = (phy->maximum_linkrate << 4) |
  43                phy->maximum_linkrate_hw;
  44
  45        if (!sas_ha->sas_phy[phy_id]->port ||
  46            !sas_ha->sas_phy[phy_id]->port->port_dev)
  47                return;
  48
  49        rphy = sas_ha->sas_phy[phy_id]->port->port_dev->rphy;
  50        resp_data[12] = rphy->identify.device_type << 4;
  51        resp_data[14] = rphy->identify.initiator_port_protocols;
  52        resp_data[15] = rphy->identify.target_port_protocols;
  53}
  54
  55/**
  56 * to_sas_gpio_gp_bit - given the gpio frame data find the byte/bit position of 'od'
  57 * @od: od bit to find
  58 * @data: incoming bitstream (from frame)
  59 * @index: requested data register index (from frame)
  60 * @count: total number of registers in the bitstream (from frame)
  61 * @bit: bit position of 'od' in the returned byte
  62 *
  63 * returns NULL if 'od' is not in 'data'
  64 *
  65 * From SFF-8485 v0.7:
  66 * "In GPIO_TX[1], bit 0 of byte 3 contains the first bit (i.e., OD0.0)
  67 *  and bit 7 of byte 0 contains the 32nd bit (i.e., OD10.1).
  68 *
  69 *  In GPIO_TX[2], bit 0 of byte 3 contains the 33rd bit (i.e., OD10.2)
  70 *  and bit 7 of byte 0 contains the 64th bit (i.e., OD21.0)."
  71 *
  72 * The general-purpose (raw-bitstream) RX registers have the same layout
  73 * although 'od' is renamed 'id' for 'input data'.
  74 *
  75 * SFF-8489 defines the behavior of the LEDs in response to the 'od' values.
  76 */
  77static u8 *to_sas_gpio_gp_bit(unsigned int od, u8 *data, u8 index, u8 count, u8 *bit)
  78{
  79        unsigned int reg;
  80        u8 byte;
  81
  82        /* gp registers start at index 1 */
  83        if (index == 0)
  84                return NULL;
  85
  86        index--; /* make index 0-based */
  87        if (od < index * 32)
  88                return NULL;
  89
  90        od -= index * 32;
  91        reg = od >> 5;
  92
  93        if (reg >= count)
  94                return NULL;
  95
  96        od &= (1 << 5) - 1;
  97        byte = 3 - (od >> 3);
  98        *bit = od & ((1 << 3) - 1);
  99
 100        return &data[reg * 4 + byte];
 101}
 102
 103int try_test_sas_gpio_gp_bit(unsigned int od, u8 *data, u8 index, u8 count)
 104{
 105        u8 *byte;
 106        u8 bit;
 107
 108        byte = to_sas_gpio_gp_bit(od, data, index, count, &bit);
 109        if (!byte)
 110                return -1;
 111
 112        return (*byte >> bit) & 1;
 113}
 114EXPORT_SYMBOL(try_test_sas_gpio_gp_bit);
 115
 116static int sas_host_smp_write_gpio(struct sas_ha_struct *sas_ha, u8 *resp_data,
 117                                   u8 reg_type, u8 reg_index, u8 reg_count,
 118                                   u8 *req_data)
 119{
 120        struct sas_internal *i = to_sas_internal(sas_ha->core.shost->transportt);
 121        int written;
 122
 123        if (i->dft->lldd_write_gpio == NULL) {
 124                resp_data[2] = SMP_RESP_FUNC_UNK;
 125                return 0;
 126        }
 127
 128        written = i->dft->lldd_write_gpio(sas_ha, reg_type, reg_index,
 129                                          reg_count, req_data);
 130
 131        if (written < 0) {
 132                resp_data[2] = SMP_RESP_FUNC_FAILED;
 133                written = 0;
 134        } else
 135                resp_data[2] = SMP_RESP_FUNC_ACC;
 136
 137        return written;
 138}
 139
 140static void sas_report_phy_sata(struct sas_ha_struct *sas_ha, u8 *resp_data,
 141                                u8 phy_id)
 142{
 143        struct sas_rphy *rphy;
 144        struct dev_to_host_fis *fis;
 145        int i;
 146
 147        if (phy_id >= sas_ha->num_phys) {
 148                resp_data[2] = SMP_RESP_NO_PHY;
 149                return;
 150        }
 151
 152        resp_data[2] = SMP_RESP_PHY_NO_SATA;
 153
 154        if (!sas_ha->sas_phy[phy_id]->port)
 155                return;
 156
 157        rphy = sas_ha->sas_phy[phy_id]->port->port_dev->rphy;
 158        fis = (struct dev_to_host_fis *)
 159                sas_ha->sas_phy[phy_id]->port->port_dev->frame_rcvd;
 160        if (rphy->identify.target_port_protocols != SAS_PROTOCOL_SATA)
 161                return;
 162
 163        resp_data[2] = SMP_RESP_FUNC_ACC;
 164        resp_data[9] = phy_id;
 165        memcpy(resp_data + 16, sas_ha->sas_phy[phy_id]->attached_sas_addr,
 166               SAS_ADDR_SIZE);
 167
 168        /* check to see if we have a valid d2h fis */
 169        if (fis->fis_type != 0x34)
 170                return;
 171
 172        /* the d2h fis is required by the standard to be in LE format */
 173        for (i = 0; i < 20; i += 4) {
 174                u8 *dst = resp_data + 24 + i, *src =
 175                        &sas_ha->sas_phy[phy_id]->port->port_dev->frame_rcvd[i];
 176                dst[0] = src[3];
 177                dst[1] = src[2];
 178                dst[2] = src[1];
 179                dst[3] = src[0];
 180        }
 181}
 182
 183static void sas_phy_control(struct sas_ha_struct *sas_ha, u8 phy_id,
 184                            u8 phy_op, enum sas_linkrate min,
 185                            enum sas_linkrate max, u8 *resp_data)
 186{
 187        struct sas_internal *i =
 188                to_sas_internal(sas_ha->core.shost->transportt);
 189        struct sas_phy_linkrates rates;
 190        struct asd_sas_phy *asd_phy;
 191
 192        if (phy_id >= sas_ha->num_phys) {
 193                resp_data[2] = SMP_RESP_NO_PHY;
 194                return;
 195        }
 196
 197        asd_phy = sas_ha->sas_phy[phy_id];
 198        switch (phy_op) {
 199        case PHY_FUNC_NOP:
 200        case PHY_FUNC_LINK_RESET:
 201        case PHY_FUNC_HARD_RESET:
 202        case PHY_FUNC_DISABLE:
 203        case PHY_FUNC_CLEAR_ERROR_LOG:
 204        case PHY_FUNC_CLEAR_AFFIL:
 205        case PHY_FUNC_TX_SATA_PS_SIGNAL:
 206                break;
 207
 208        default:
 209                resp_data[2] = SMP_RESP_PHY_UNK_OP;
 210                return;
 211        }
 212
 213        rates.minimum_linkrate = min;
 214        rates.maximum_linkrate = max;
 215
 216        /* filter reset requests through libata eh */
 217        if (phy_op == PHY_FUNC_LINK_RESET && sas_try_ata_reset(asd_phy) == 0) {
 218                resp_data[2] = SMP_RESP_FUNC_ACC;
 219                return;
 220        }
 221
 222        if (i->dft->lldd_control_phy(asd_phy, phy_op, &rates))
 223                resp_data[2] = SMP_RESP_FUNC_FAILED;
 224        else
 225                resp_data[2] = SMP_RESP_FUNC_ACC;
 226}
 227
 228int sas_smp_host_handler(struct Scsi_Host *shost, struct request *req,
 229                         struct request *rsp)
 230{
 231        u8 *req_data = NULL, *resp_data = NULL, *buf;
 232        struct sas_ha_struct *sas_ha = SHOST_TO_SAS_HA(shost);
 233        int error = -EINVAL;
 234
 235        /* eight is the minimum size for request and response frames */
 236        if (blk_rq_bytes(req) < 8 || blk_rq_bytes(rsp) < 8)
 237                goto out;
 238
 239        if (bio_offset(req->bio) + blk_rq_bytes(req) > PAGE_SIZE ||
 240            bio_offset(rsp->bio) + blk_rq_bytes(rsp) > PAGE_SIZE) {
 241                shost_printk(KERN_ERR, shost,
 242                        "SMP request/response frame crosses page boundary");
 243                goto out;
 244        }
 245
 246        req_data = kzalloc(blk_rq_bytes(req), GFP_KERNEL);
 247
 248        /* make sure frame can always be built ... we copy
 249         * back only the requested length */
 250        resp_data = kzalloc(max(blk_rq_bytes(rsp), 128U), GFP_KERNEL);
 251
 252        if (!req_data || !resp_data) {
 253                error = -ENOMEM;
 254                goto out;
 255        }
 256
 257        local_irq_disable();
 258        buf = kmap_atomic(bio_page(req->bio));
 259        memcpy(req_data, buf, blk_rq_bytes(req));
 260        kunmap_atomic(buf - bio_offset(req->bio));
 261        local_irq_enable();
 262
 263        if (req_data[0] != SMP_REQUEST)
 264                goto out;
 265
 266        /* always succeeds ... even if we can't process the request
 267         * the result is in the response frame */
 268        error = 0;
 269
 270        /* set up default don't know response */
 271        resp_data[0] = SMP_RESPONSE;
 272        resp_data[1] = req_data[1];
 273        resp_data[2] = SMP_RESP_FUNC_UNK;
 274
 275        switch (req_data[1]) {
 276        case SMP_REPORT_GENERAL:
 277                req->resid_len -= 8;
 278                rsp->resid_len -= 32;
 279                resp_data[2] = SMP_RESP_FUNC_ACC;
 280                resp_data[9] = sas_ha->num_phys;
 281                break;
 282
 283        case SMP_REPORT_MANUF_INFO:
 284                req->resid_len -= 8;
 285                rsp->resid_len -= 64;
 286                resp_data[2] = SMP_RESP_FUNC_ACC;
 287                memcpy(resp_data + 12, shost->hostt->name,
 288                       SAS_EXPANDER_VENDOR_ID_LEN);
 289                memcpy(resp_data + 20, "libsas virt phy",
 290                       SAS_EXPANDER_PRODUCT_ID_LEN);
 291                break;
 292
 293        case SMP_READ_GPIO_REG:
 294                /* FIXME: need GPIO support in the transport class */
 295                break;
 296
 297        case SMP_DISCOVER:
 298                req->resid_len -= 16;
 299                if ((int)req->resid_len < 0) {
 300                        req->resid_len = 0;
 301                        error = -EINVAL;
 302                        goto out;
 303                }
 304                rsp->resid_len -= 56;
 305                sas_host_smp_discover(sas_ha, resp_data, req_data[9]);
 306                break;
 307
 308        case SMP_REPORT_PHY_ERR_LOG:
 309                /* FIXME: could implement this with additional
 310                 * libsas callbacks providing the HW supports it */
 311                break;
 312
 313        case SMP_REPORT_PHY_SATA:
 314                req->resid_len -= 16;
 315                if ((int)req->resid_len < 0) {
 316                        req->resid_len = 0;
 317                        error = -EINVAL;
 318                        goto out;
 319                }
 320                rsp->resid_len -= 60;
 321                sas_report_phy_sata(sas_ha, resp_data, req_data[9]);
 322                break;
 323
 324        case SMP_REPORT_ROUTE_INFO:
 325                /* Can't implement; hosts have no routes */
 326                break;
 327
 328        case SMP_WRITE_GPIO_REG: {
 329                /* SFF-8485 v0.7 */
 330                const int base_frame_size = 11;
 331                int to_write = req_data[4];
 332
 333                if (blk_rq_bytes(req) < base_frame_size + to_write * 4 ||
 334                    req->resid_len < base_frame_size + to_write * 4) {
 335                        resp_data[2] = SMP_RESP_INV_FRM_LEN;
 336                        break;
 337                }
 338
 339                to_write = sas_host_smp_write_gpio(sas_ha, resp_data, req_data[2],
 340                                                   req_data[3], to_write, &req_data[8]);
 341                req->resid_len -= base_frame_size + to_write * 4;
 342                rsp->resid_len -= 8;
 343                break;
 344        }
 345
 346        case SMP_CONF_ROUTE_INFO:
 347                /* Can't implement; hosts have no routes */
 348                break;
 349
 350        case SMP_PHY_CONTROL:
 351                req->resid_len -= 44;
 352                if ((int)req->resid_len < 0) {
 353                        req->resid_len = 0;
 354                        error = -EINVAL;
 355                        goto out;
 356                }
 357                rsp->resid_len -= 8;
 358                sas_phy_control(sas_ha, req_data[9], req_data[10],
 359                                req_data[32] >> 4, req_data[33] >> 4,
 360                                resp_data);
 361                break;
 362
 363        case SMP_PHY_TEST_FUNCTION:
 364                /* FIXME: should this be implemented? */
 365                break;
 366
 367        default:
 368                /* probably a 2.0 function */
 369                break;
 370        }
 371
 372        local_irq_disable();
 373        buf = kmap_atomic(bio_page(rsp->bio));
 374        memcpy(buf, resp_data, blk_rq_bytes(rsp));
 375        flush_kernel_dcache_page(bio_page(rsp->bio));
 376        kunmap_atomic(buf - bio_offset(rsp->bio));
 377        local_irq_enable();
 378
 379 out:
 380        kfree(req_data);
 381        kfree(resp_data);
 382        return error;
 383}
 384