/*
 *      sd.c Copyright (C) 1992 Drew Eckhardt
 *           Copyright (C) 1993, 1994, 1995, 1999 Eric Youngdale
 *
 *      Linux scsi disk driver
 *              Initial versions: Drew Eckhardt
 *              Subsequent revisions: Eric Youngdale
 *  Modification history:
 *       - Drew Eckhardt <drew@colorado.edu> original
 *       - Eric Youngdale <eric@andante.org> add scatter-gather, multiple
 *         outstanding request, and other enhancements.
 *         Support loadable low-level scsi drivers.
 *       - Jirka Hanika <geo@ff.cuni.cz> support more scsi disks using
 *         eight major numbers.
 *       - Richard Gooch <rgooch@atnf.csiro.au> support devfs.
 *   - Torben Mathiasen <tmm@image.dk> Resource allocation fixes in
 *     sd_init and cleanups.
 *   - Alex Davis <letmein@erols.com> Fix problem where partition info
 *     not being read in sd_open. Fix problem where removable media
 *     could be ejected after sd_open.
 *   - Douglas Gilbert <dgilbert@interlog.com> cleanup for lk 2.5.x
 *   - Badari Pulavarty <pbadari@us.ibm.com>, Matthew Wilcox
 *     <willy@debian.org>, Kurt Garloff <garloff@suse.de>:
 *     Support 32k/1M disks.
 *
 *  Logging policy (needs CONFIG_SCSI_LOGGING defined):
 *   - setting up transfer: SCSI_LOG_HLQUEUE levels 1 and 2
 *   - end of transfer (bh + scsi_lib): SCSI_LOG_HLCOMPLETE level 1
 *   - entering sd_ioctl: SCSI_LOG_IOCTL level 1
 *   - entering other commands: SCSI_LOG_HLQUEUE level 3
 *  Note: when the logging level is set by the user, it must be greater
 *  than the level indicated above to trigger output.
 */

#include <linux/module.h>
#include <linux/fs.h>
#include <linux/kernel.h>
#include <linux/mm.h>
#include <linux/bio.h>
#include <linux/genhd.h>
#include <linux/hdreg.h>
#include <linux/errno.h>
#include <linux/idr.h>
#include <linux/interrupt.h>
#include <linux/init.h>
#include <linux/blkdev.h>
#include <linux/blkpg.h>
#include <linux/delay.h>
#include <linux/mutex.h>
#include <linux/string_helpers.h>
#include <linux/async.h>
#include <asm/uaccess.h>
#include <asm/unaligned.h>

#include <scsi/scsi.h>
#include <scsi/scsi_cmnd.h>
#include <scsi/scsi_dbg.h>
#include <scsi/scsi_device.h>
#include <scsi/scsi_driver.h>
#include <scsi/scsi_eh.h>
#include <scsi/scsi_host.h>
#include <scsi/scsi_ioctl.h>
#include <scsi/scsicam.h>

#include "sd.h"
#include "scsi_logging.h"
//Patch by QNAP: usb and sata device mapping
#ifdef CONFIG_MACH_QNAPTS
#include <linux/proc_fs.h>
#include <linux/usb.h>
#include <qnap/pic.h>
int usbdev_exist[MAX_USB_ENTRY];
int usbdev_status_changed[MAX_USB_ENTRY];
int usbdev_speedtype[MAX_USB_ENTRY];
EXPORT_SYMBOL(usbdev_exist);
EXPORT_SYMBOL(usbdev_status_changed);
EXPORT_SYMBOL(usbdev_speedtype);
int QNAP_disk_index(struct scsi_device *sdp);
static int sd_dev_arr[26];
//Patch by QNAP: add x59 derivative model
extern int get_model_revision(void);
extern int is_x59_proII_model(void);
//////////////////////////////////
#endif
#ifdef NAS_VIRTUAL
#define ISCSI_DEV_START_INDEX 598
#define MAX_ISCSI_DISK 26
#define Is_iSCSI_Index(index) ((index >= ISCSI_DEV_START_INDEX && index <= (ISCSI_DEV_START_INDEX+MAX_ISCSI_DISK-1))? 1 : 0)
#define Get_iSCSI_Index(c1, c2) (26*(c1-'a'+1)+c2-'a')
static int iscsi_dev_arr[MAX_ISCSI_DISK];
static struct device * iscsi_dev_ptr[MAX_ISCSI_DISK];
#endif
////////////////////////////////////
//Patch by QNAP: Port Multiplier
#define ESATA_BUS1_START_INDEX 0x28a //sdya
#define ESATA_BUS2_START_INDEX 0x2a4 //sdza
#define MAX_ESATA_DISKS_BY_BUS 8
#define Is_ESATA_Bus1_Index(index) ((index >= ESATA_BUS1_START_INDEX && index < (ESATA_BUS1_START_INDEX + MAX_ESATA_DISKS_BY_BUS)) ? 1 : 0)
#define Is_ESATA_Bus2_Index(index) ((index >= ESATA_BUS2_START_INDEX && index < (ESATA_BUS2_START_INDEX + MAX_ESATA_DISKS_BY_BUS)) ? 1 : 0)
static int esata_bus1_dev_arr[MAX_ESATA_DISKS_BY_BUS];
static int esata_bus2_dev_arr[MAX_ESATA_DISKS_BY_BUS];
//
//Patch by QNAP: USB Port Multiplier
#define USB_FRONT_PORT_START_INDEX 0xea //sdia
#define USB_BACK_PORT_1_START_INDEX 0x1EE //sdsa
#define USB_BACK_PORT_2_START_INDEX 0x208 //sdta
#define USB_BACK_PORT_3_START_INDEX 0x222 //sdua
#define USB_BACK_PORT_4_START_INDEX 0x23c //sdva
#define USB_BACK_PORT_5_START_INDEX 0x1ba //sdqa
#define USB_BACK_PORT_6_START_INDEX 0x1d4 //sdra
#define MAX_USB_DISKS 26
#define Is_USB_Front_Port_Index(index) ((index >= USB_FRONT_PORT_START_INDEX && index < (USB_FRONT_PORT_START_INDEX + MAX_USB_DISKS)) ? 1 : 0)
#define Is_USB_Back_Port1_Index(index) ((index >= USB_BACK_PORT_1_START_INDEX && index < (USB_BACK_PORT_1_START_INDEX + MAX_USB_DISKS)) ? 1 : 0)
#define Is_USB_Back_Port2_Index(index) ((index >= USB_BACK_PORT_2_START_INDEX && index < (USB_BACK_PORT_2_START_INDEX + MAX_USB_DISKS)) ? 1 : 0)
#define Is_USB_Back_Port3_Index(index) ((index >= USB_BACK_PORT_3_START_INDEX && index < (USB_BACK_PORT_3_START_INDEX + MAX_USB_DISKS)) ? 1 : 0)
#define Is_USB_Back_Port4_Index(index) ((index >= USB_BACK_PORT_4_START_INDEX && index < (USB_BACK_PORT_4_START_INDEX + MAX_USB_DISKS)) ? 1 : 0)
#define Is_USB_Back_Port5_Index(index) ((index >= USB_BACK_PORT_5_START_INDEX && index < (USB_BACK_PORT_5_START_INDEX + MAX_USB_DISKS)) ? 1 : 0)
#define Is_USB_Back_Port6_Index(index) ((index >= USB_BACK_PORT_6_START_INDEX && index < (USB_BACK_PORT_6_START_INDEX + MAX_USB_DISKS)) ? 1 : 0)
static int usb_front_port_dev_arr[MAX_USB_DISKS];
static int usb_back_port1_dev_arr[MAX_USB_DISKS];
static int usb_back_port2_dev_arr[MAX_USB_DISKS];
static int usb_back_port3_dev_arr[MAX_USB_DISKS];
static int usb_back_port4_dev_arr[MAX_USB_DISKS];
static int usb_back_port5_dev_arr[MAX_USB_DISKS];
static int usb_back_port6_dev_arr[MAX_USB_DISKS];
////////////////////////////////
MODULE_AUTHOR("Eric Youngdale");
MODULE_DESCRIPTION("SCSI disk (sd) driver");
MODULE_LICENSE("GPL");

MODULE_ALIAS_BLOCKDEV_MAJOR(SCSI_DISK0_MAJOR);
MODULE_ALIAS_BLOCKDEV_MAJOR(SCSI_DISK1_MAJOR);
MODULE_ALIAS_BLOCKDEV_MAJOR(SCSI_DISK2_MAJOR);
MODULE_ALIAS_BLOCKDEV_MAJOR(SCSI_DISK3_MAJOR);
MODULE_ALIAS_BLOCKDEV_MAJOR(SCSI_DISK4_MAJOR);
MODULE_ALIAS_BLOCKDEV_MAJOR(SCSI_DISK5_MAJOR);
MODULE_ALIAS_BLOCKDEV_MAJOR(SCSI_DISK6_MAJOR);
MODULE_ALIAS_BLOCKDEV_MAJOR(SCSI_DISK7_MAJOR);
MODULE_ALIAS_BLOCKDEV_MAJOR(SCSI_DISK8_MAJOR);
MODULE_ALIAS_BLOCKDEV_MAJOR(SCSI_DISK9_MAJOR);
MODULE_ALIAS_BLOCKDEV_MAJOR(SCSI_DISK10_MAJOR);
MODULE_ALIAS_BLOCKDEV_MAJOR(SCSI_DISK11_MAJOR);
MODULE_ALIAS_BLOCKDEV_MAJOR(SCSI_DISK12_MAJOR);
MODULE_ALIAS_BLOCKDEV_MAJOR(SCSI_DISK13_MAJOR);
MODULE_ALIAS_BLOCKDEV_MAJOR(SCSI_DISK14_MAJOR);
MODULE_ALIAS_BLOCKDEV_MAJOR(SCSI_DISK15_MAJOR);
MODULE_ALIAS_SCSI_DEVICE(TYPE_DISK);
MODULE_ALIAS_SCSI_DEVICE(TYPE_MOD);
MODULE_ALIAS_SCSI_DEVICE(TYPE_RBC);

#if !defined(CONFIG_DEBUG_BLOCK_EXT_DEVT)
#define SD_MINORS   16
#else
#define SD_MINORS   0
#endif

static int  sd_revalidate_disk(struct gendisk *);
static int  sd_probe(struct device *);
static int  sd_remove(struct device *);
static void sd_shutdown(struct device *);
static int sd_suspend(struct device *, pm_message_t state);
static int sd_resume(struct device *);
static void sd_rescan(struct device *);
static int sd_done(struct scsi_cmnd *);
static void sd_read_capacity(struct scsi_disk *sdkp, unsigned char *buffer);
static void scsi_disk_release(struct device *cdev);
static void sd_print_sense_hdr(struct scsi_disk *, struct scsi_sense_hdr *);
static void sd_print_result(struct scsi_disk *, int);
//Patch by QNAP: usb and sata device mapping
#ifndef CONFIG_MACH_QNAPTS
static DEFINE_IDA(sd_index_ida);
#endif
#ifdef NAS_VIRTUAL
#define QNAP_DISK_NODE "scsi/qnap_disk_node"
#define MAX_DISK_NODE_LEN       16

static char qnap_disk_node[MAX_DISK_NODE_LEN];
static struct proc_dir_entry *qnap_disk_node_proc_entry;

#ifdef NAS_VIRTUAL_EX
#define QNAP_IQN_NODE "scsi/qnap_iqn_node"
#define MAX_IQN_NODE_LEN       260
#define QNAP_SN_VPD_NODE "scsi/qnap_sn_vpd_node"

static char *iscsi_iqn_arr[MAX_ISCSI_DISK];
static unsigned char *iscsi_sn_vpd_arr[MAX_ISCSI_DISK];

static char qnap_iqn_node[MAX_IQN_NODE_LEN];
static struct proc_dir_entry *qnap_iqn_node_proc_entry;
#endif
static ssize_t qnap_disk_node_write( struct file *filp, const char __user *buff, unsigned long len, void *data )
{
  if (len > MAX_DISK_NODE_LEN) {
    printk(KERN_INFO "qnap_disk_node: only can write %d bytes!\n", MAX_DISK_NODE_LEN);
    return -ENOSPC;
  }
  if (copy_from_user(qnap_disk_node, buff, len )) {
    return -EFAULT;
  }
  return len;
}
static int qnap_disk_node_read( char *page, char **start, off_t off, int count, int *eof, void *data )
{
        *eof = 1;
        return snprintf(page, count, "%s\n", qnap_disk_node);
}
#ifdef NAS_VIRTUAL_EX
static ssize_t qnap_iqn_node_write( struct file *filp, const char __user *buff, unsigned long len, void *data )
{
printk("qnap_iqn_node_write(%p, %ul, %p)\n", buff, len, data);
  memset(qnap_iqn_node, 0, sizeof(qnap_iqn_node));
  if (copy_from_user(qnap_iqn_node, buff, MAX_IQN_NODE_LEN-1)) {
    return -EFAULT;
  }
  int copy_len = 0;
  qnap_iqn_node[MAX_IQN_NODE_LEN-1] = 0;
  if (*qnap_iqn_node) {
    char *ptr = strchr(qnap_iqn_node, '\n');
    if (ptr) *ptr = 0;
    copy_len = strlen(qnap_iqn_node);
printk("qnap_iqn_node_write copy_len=%d, get %s\n", copy_len, qnap_iqn_node);
  }
  return (copy_len > len)?copy_len:len;
}
static int qnap_iqn_node_read( char *page, char **start, off_t off, int count, int *eof, void *data )
{
    int i, total_count = 0;
    *eof = 1;
    for (i = 0; i < MAX_ISCSI_DISK; i ++) {
        if (iscsi_dev_arr[i] && iscsi_iqn_arr[i]) {
            int read_count = snprintf(page+total_count, count, "%4d %s #%s\n", i, iscsi_iqn_arr[i], (iscsi_sn_vpd_arr[i])?iscsi_sn_vpd_arr[i]+4:"");
            total_count += read_count;
            if ((count -= read_count) <= 0)
                break;
        }
    }
    if (count) {
        int read_count = snprintf(page+total_count, count, "END\n");
        total_count += read_count;
    }
    return total_count;
}
#endif
void create_qnap_disk_node_proc(void)
{
        qnap_disk_node_proc_entry = create_proc_entry( QNAP_DISK_NODE, 0644, NULL );
        if (!qnap_disk_node_proc_entry) return ;
        qnap_disk_node_proc_entry->read_proc = qnap_disk_node_read;
        qnap_disk_node_proc_entry->write_proc = qnap_disk_node_write;
#ifdef NAS_VIRTUAL_EX
        qnap_iqn_node_proc_entry = create_proc_entry( QNAP_IQN_NODE, 0644, NULL );
        if (!qnap_iqn_node_proc_entry) return ;
        qnap_iqn_node_proc_entry->read_proc = qnap_iqn_node_read;
        qnap_iqn_node_proc_entry->write_proc = qnap_iqn_node_write;
#endif
}
void remove_qnap_disk_node_proc(void)
{
        remove_proc_entry(QNAP_DISK_NODE, NULL);
#ifdef NAS_VIRTUAL_EX
        remove_proc_entry(QNAP_IQN_NODE, NULL);
#endif
}
#endif
///////////////////////////////////////

static DEFINE_SPINLOCK(sd_index_lock);

/* This semaphore is used to mediate the 0->1 reference get in the
 * face of object destruction (i.e. we can't allow a get on an
 * object after last put) */
static DEFINE_MUTEX(sd_ref_mutex);

struct kmem_cache *sd_cdb_cache;
mempool_t *sd_cdb_pool;

static const char *sd_cache_types[] = {
    "write through", "none", "write back",
    "write back, no read (daft)"
};

static ssize_t
sd_store_cache_type(struct device *dev, struct device_attribute *attr,
            const char *buf, size_t count)
{
    int i, ct = -1, rcd, wce, sp;
    struct scsi_disk *sdkp = to_scsi_disk(dev);
    struct scsi_device *sdp = sdkp->device;
    char buffer[64];
    char *buffer_data;
    struct scsi_mode_data data;
    struct scsi_sense_hdr sshdr;
    int len;

    if (sdp->type != TYPE_DISK)
        /* no cache control on RBC devices; theoretically they
         * can do it, but there's probably so many exceptions
         * it's not worth the risk */
        return -EINVAL;

    for (i = 0; i < ARRAY_SIZE(sd_cache_types); i++) {
        const int len = strlen(sd_cache_types[i]);
        if (strncmp(sd_cache_types[i], buf, len) == 0 &&
            buf[len] == '\n') {
            ct = i;
            break;
        }
    }
    if (ct < 0)
        return -EINVAL;
    rcd = ct & 0x01 ? 1 : 0;
    wce = ct & 0x02 ? 1 : 0;
    if (scsi_mode_sense(sdp, 0x08, 8, buffer, sizeof(buffer), SD_TIMEOUT,
                SD_MAX_RETRIES, &data, NULL))
        return -EINVAL;
    len = min_t(size_t, sizeof(buffer), data.length - data.header_length -
          data.block_descriptor_length);
    buffer_data = buffer + data.header_length +
        data.block_descriptor_length;
    buffer_data[2] &= ~0x05;
    buffer_data[2] |= wce << 2 | rcd;
    sp = buffer_data[0] & 0x80 ? 1 : 0;

    if (scsi_mode_select(sdp, 1, sp, 8, buffer_data, len, SD_TIMEOUT,
                 SD_MAX_RETRIES, &data, &sshdr)) {
        if (scsi_sense_valid(&sshdr))
            sd_print_sense_hdr(sdkp, &sshdr);
        return -EINVAL;
    }
    revalidate_disk(sdkp->disk);
    return count;
}

static ssize_t
sd_store_manage_start_stop(struct device *dev, struct device_attribute *attr,
               const char *buf, size_t count)
{
    struct scsi_disk *sdkp = to_scsi_disk(dev);
    struct scsi_device *sdp = sdkp->device;

    if (!capable(CAP_SYS_ADMIN))
        return -EACCES;

    sdp->manage_start_stop = simple_strtoul(buf, NULL, 10);

    return count;
}

static ssize_t
sd_store_allow_restart(struct device *dev, struct device_attribute *attr,
               const char *buf, size_t count)
{
    struct scsi_disk *sdkp = to_scsi_disk(dev);
    struct scsi_device *sdp = sdkp->device;

    if (!capable(CAP_SYS_ADMIN))
        return -EACCES;

    if (sdp->type != TYPE_DISK)
        return -EINVAL;

    sdp->allow_restart = simple_strtoul(buf, NULL, 10);

    return count;
}

static ssize_t
sd_show_cache_type(struct device *dev, struct device_attribute *attr,
           char *buf)
{
    struct scsi_disk *sdkp = to_scsi_disk(dev);
    int ct = sdkp->RCD + 2*sdkp->WCE;

    return snprintf(buf, 40, "%s\n", sd_cache_types[ct]);
}

static ssize_t
sd_show_fua(struct device *dev, struct device_attribute *attr, char *buf)
{
    struct scsi_disk *sdkp = to_scsi_disk(dev);

    return snprintf(buf, 20, "%u\n", sdkp->DPOFUA);
}

static ssize_t
sd_show_manage_start_stop(struct device *dev, struct device_attribute *attr,
              char *buf)
{
    struct scsi_disk *sdkp = to_scsi_disk(dev);
    struct scsi_device *sdp = sdkp->device;

    return snprintf(buf, 20, "%u\n", sdp->manage_start_stop);
}

static ssize_t
sd_show_allow_restart(struct device *dev, struct device_attribute *attr,
              char *buf)
{
    struct scsi_disk *sdkp = to_scsi_disk(dev);

    return snprintf(buf, 40, "%d\n", sdkp->device->allow_restart);
}

static ssize_t
sd_show_protection_type(struct device *dev, struct device_attribute *attr,
            char *buf)
{
    struct scsi_disk *sdkp = to_scsi_disk(dev);

    return snprintf(buf, 20, "%u\n", sdkp->protection_type);
}

static ssize_t
sd_show_app_tag_own(struct device *dev, struct device_attribute *attr,
            char *buf)
{
    struct scsi_disk *sdkp = to_scsi_disk(dev);

    return snprintf(buf, 20, "%u\n", sdkp->ATO);
}

static ssize_t
sd_show_thin_provisioning(struct device *dev, struct device_attribute *attr,
              char *buf)
{
    struct scsi_disk *sdkp = to_scsi_disk(dev);

    return snprintf(buf, 20, "%u\n", sdkp->thin_provisioning);
}

//Patch by QNAP:fix SSD SMART issue
#ifdef CONFIG_MACH_QNAPTS
//bit 0->SSD medium(ps.some SSD not support)
//bit 1->SMART feature support
//bit 2->SMART self-test support
//bit 3->SMART error log support
static ssize_t sd_show_smart_capability(struct device *dev, struct device_attribute *attr,
            char *buf)
{
    struct scsi_disk *sdkp = to_scsi_disk(dev);
    unsigned char *inquiry = sdkp->device->inquiry;
    return snprintf(buf, 40, "%x\n", inquiry[36]);
}
#endif
////////////////////////

static struct device_attribute sd_disk_attrs[] = {
    __ATTR(cache_type, S_IRUGO|S_IWUSR, sd_show_cache_type,
           sd_store_cache_type),
    __ATTR(FUA, S_IRUGO, sd_show_fua, NULL),
    __ATTR(allow_restart, S_IRUGO|S_IWUSR, sd_show_allow_restart,
           sd_store_allow_restart),
    __ATTR(manage_start_stop, S_IRUGO|S_IWUSR, sd_show_manage_start_stop,
           sd_store_manage_start_stop),
    __ATTR(protection_type, S_IRUGO, sd_show_protection_type, NULL),
    __ATTR(app_tag_own, S_IRUGO, sd_show_app_tag_own, NULL),
    __ATTR(thin_provisioning, S_IRUGO, sd_show_thin_provisioning, NULL),
//Patch by QNAP:fix SSD SMART issue
#ifdef CONFIG_MACH_QNAPTS
    __ATTR(smart_capability, S_IRUGO|S_IWUSR, sd_show_smart_capability,NULL),
#endif
/////////////////////////////
    __ATTR_NULL,
};

static struct class sd_disk_class = {
    .name       = "scsi_disk",
    .owner      = THIS_MODULE,
    .dev_release    = scsi_disk_release,
    .dev_attrs  = sd_disk_attrs,
};

static struct scsi_driver sd_template = {
    .owner          = THIS_MODULE,
    .gendrv = {
        .name       = "sd",
        .probe      = sd_probe,
        .remove     = sd_remove,
        .suspend    = sd_suspend,
        .resume     = sd_resume,
        .shutdown   = sd_shutdown,
    },
    .rescan         = sd_rescan,
    .done           = sd_done,
};

/*
 * Device no to disk mapping:
 *
 *       major         disc2     disc  p1
 *   |............|.............|....|....| <- dev_t
 *    31        20 19          8 7  4 3  0
 *
 * Inside a major, we have 16k disks, however mapped non-
 * contiguously. The first 16 disks are for major0, the next
 * ones with major1, ... Disk 256 is for major0 again, disk 272
 * for major1, ...
 * As we stay compatible with our numbering scheme, we can reuse
 * the well-know SCSI majors 8, 65--71, 136--143.
 */
static int sd_major(int major_idx)
{
    switch (major_idx) {
    case 0:
        return SCSI_DISK0_MAJOR;
    case 1 ... 7:
        return SCSI_DISK1_MAJOR + major_idx - 1;
    case 8 ... 15:
        return SCSI_DISK8_MAJOR + major_idx - 8;
    default:
        BUG();
        return 0;   /* shut up gcc */
    }
}

static struct scsi_disk *__scsi_disk_get(struct gendisk *disk)
{
    struct scsi_disk *sdkp = NULL;

    if (disk->private_data) {
        sdkp = scsi_disk(disk);
        if (scsi_device_get(sdkp->device) == 0)
            get_device(&sdkp->dev);
        else
            sdkp = NULL;
    }
    return sdkp;
}

static struct scsi_disk *scsi_disk_get(struct gendisk *disk)
{
    struct scsi_disk *sdkp;

    mutex_lock(&sd_ref_mutex);
    sdkp = __scsi_disk_get(disk);
    mutex_unlock(&sd_ref_mutex);
    return sdkp;
}

static struct scsi_disk *scsi_disk_get_from_dev(struct device *dev)
{
    struct scsi_disk *sdkp;

    mutex_lock(&sd_ref_mutex);
    sdkp = dev_get_drvdata(dev);
    if (sdkp)
        sdkp = __scsi_disk_get(sdkp->disk);
    mutex_unlock(&sd_ref_mutex);
    return sdkp;
}

static void scsi_disk_put(struct scsi_disk *sdkp)
{
    struct scsi_device *sdev = sdkp->device;

    mutex_lock(&sd_ref_mutex);
    put_device(&sdkp->dev);
    scsi_device_put(sdev);
    mutex_unlock(&sd_ref_mutex);
}

static void sd_prot_op(struct scsi_cmnd *scmd, unsigned int dif)
{
    unsigned int prot_op = SCSI_PROT_NORMAL;
    unsigned int dix = scsi_prot_sg_count(scmd);

    if (scmd->sc_data_direction == DMA_FROM_DEVICE) {
        if (dif && dix)
            prot_op = SCSI_PROT_READ_PASS;
        else if (dif && !dix)
            prot_op = SCSI_PROT_READ_STRIP;
        else if (!dif && dix)
            prot_op = SCSI_PROT_READ_INSERT;
    } else {
        if (dif && dix)
            prot_op = SCSI_PROT_WRITE_PASS;
        else if (dif && !dix)
            prot_op = SCSI_PROT_WRITE_INSERT;
        else if (!dif && dix)
            prot_op = SCSI_PROT_WRITE_STRIP;
    }

    scsi_set_prot_op(scmd, prot_op);
    scsi_set_prot_type(scmd, dif);
}

/**
 * sd_prepare_discard - unmap blocks on thinly provisioned device
 * @rq: Request to prepare
 *
 * Will issue either UNMAP or WRITE SAME(16) depending on preference
 * indicated by target device.
 **/
static int sd_prepare_discard(struct request *rq)
{
    struct scsi_disk *sdkp = scsi_disk(rq->rq_disk);
    struct bio *bio = rq->bio;
    sector_t sector = bio->bi_sector;
    unsigned int num = bio_sectors(bio);

    if (sdkp->device->sector_size == 4096) {
        sector >>= 3;
        num >>= 3;
    }

    rq->cmd_type = REQ_TYPE_BLOCK_PC;
    rq->timeout = SD_TIMEOUT;

    memset(rq->cmd, 0, rq->cmd_len);

    if (sdkp->unmap) {
        char *buf = kmap_atomic(bio_page(bio), KM_USER0);

        rq->cmd[0] = UNMAP;
        rq->cmd[8] = 24;
        rq->cmd_len = 10;

        /* Ensure that data length matches payload */
        rq->__data_len = bio->bi_size = bio->bi_io_vec->bv_len = 24;

        put_unaligned_be16(6 + 16, &buf[0]);
        put_unaligned_be16(16, &buf[2]);
        put_unaligned_be64(sector, &buf[8]);
        put_unaligned_be32(num, &buf[16]);

        kunmap_atomic(buf, KM_USER0);
    } else {
        rq->cmd[0] = WRITE_SAME_16;
        rq->cmd[1] = 0x8; /* UNMAP */
        put_unaligned_be64(sector, &rq->cmd[2]);
        put_unaligned_be32(num, &rq->cmd[10]);
        rq->cmd_len = 16;
    }

    return BLKPREP_OK;
}

/**
 *  sd_init_command - build a scsi (read or write) command from
 *  information in the request structure.
 *  @SCpnt: pointer to mid-level's per scsi command structure that
 *  contains request and into which the scsi command is written
 *
 *  Returns 1 if successful and 0 if error (or cannot be done now).
 **/
static int sd_prep_fn(struct request_queue *q, struct request *rq)
{
    struct scsi_cmnd *SCpnt;
    struct scsi_device *sdp = q->queuedata;
    struct gendisk *disk = rq->rq_disk;
    struct scsi_disk *sdkp;
    sector_t block = blk_rq_pos(rq);
    sector_t threshold;
    unsigned int this_count = blk_rq_sectors(rq);
    int ret, host_dif;
    unsigned char protect;

    /*
     * Discard request come in as REQ_TYPE_FS but we turn them into
     * block PC requests to make life easier.
     */
    if (blk_discard_rq(rq))
        ret = sd_prepare_discard(rq);

    if (rq->cmd_type == REQ_TYPE_BLOCK_PC) {
        ret = scsi_setup_blk_pc_cmnd(sdp, rq);
        goto out;
    } else if (rq->cmd_type != REQ_TYPE_FS) {
        ret = BLKPREP_KILL;
        goto out;
    }
    ret = scsi_setup_fs_cmnd(sdp, rq);
    if (ret != BLKPREP_OK)
        goto out;
    SCpnt = rq->special;
    sdkp = scsi_disk(disk);

    /* from here on until we're complete, any goto out
     * is used for a killable error condition */
    ret = BLKPREP_KILL;

    SCSI_LOG_HLQUEUE(1, scmd_printk(KERN_INFO, SCpnt,
                    "sd_init_command: block=%llu, "
                    "count=%d\n",
                    (unsigned long long)block,
                    this_count));

    if (!sdp || !scsi_device_online(sdp) ||
        block + blk_rq_sectors(rq) > get_capacity(disk)) {
        SCSI_LOG_HLQUEUE(2, scmd_printk(KERN_INFO, SCpnt,
                        "Finishing %u sectors\n",
                        blk_rq_sectors(rq)));
        SCSI_LOG_HLQUEUE(2, scmd_printk(KERN_INFO, SCpnt,
                        "Retry with 0x%p\n", SCpnt));
        goto out;
    }

    if (sdp->changed) {
        /*
         * quietly refuse to do anything to a changed disc until
         * the changed bit has been reset
         */
        /* printk("SCSI disk has been changed. Prohibiting further I/O.\n"); */
        goto out;
    }

    /*
     * Some SD card readers can't handle multi-sector accesses which touch
     * the last one or two hardware sectors.  Split accesses as needed.
     */
    threshold = get_capacity(disk) - SD_LAST_BUGGY_SECTORS *
        (sdp->sector_size / 512);

    if (unlikely(sdp->last_sector_bug && block + this_count > threshold)) {
        if (block < threshold) {
            /* Access up to the threshold but not beyond */
            this_count = threshold - block;
        } else {
            /* Access only a single hardware sector */
            this_count = sdp->sector_size / 512;
        }
    }

    SCSI_LOG_HLQUEUE(2, scmd_printk(KERN_INFO, SCpnt, "block=%llu\n",
                    (unsigned long long)block));

    /*
     * If we have a 1K hardware sectorsize, prevent access to single
     * 512 byte sectors.  In theory we could handle this - in fact
     * the scsi cdrom driver must be able to handle this because
     * we typically use 1K blocksizes, and cdroms typically have
     * 2K hardware sectorsizes.  Of course, things are simpler
     * with the cdrom, since it is read-only.  For performance
     * reasons, the filesystems should be able to handle this
     * and not force the scsi disk driver to use bounce buffers
     * for this.
     */
    if (sdp->sector_size == 1024) {
        if ((block & 1) || (blk_rq_sectors(rq) & 1)) {
            scmd_printk(KERN_ERR, SCpnt,
                    "Bad block number requested\n");
            goto out;
        } else {
            block = block >> 1;
            this_count = this_count >> 1;
        }
    }
    if (sdp->sector_size == 2048) {
        if ((block & 3) || (blk_rq_sectors(rq) & 3)) {
            scmd_printk(KERN_ERR, SCpnt,
                    "Bad block number requested\n");
            goto out;
        } else {
            block = block >> 2;
            this_count = this_count >> 2;
        }
    }
    if (sdp->sector_size == 4096) {
        if ((block & 7) || (blk_rq_sectors(rq) & 7)) {
            scmd_printk(KERN_ERR, SCpnt,
                    "Bad block number requested\n");
            goto out;
        } else {
            block = block >> 3;
            this_count = this_count >> 3;
        }
    }
    if (rq_data_dir(rq) == WRITE) {
        if (!sdp->writeable) {
            goto out;
        }
        SCpnt->cmnd[0] = WRITE_6;
        SCpnt->sc_data_direction = DMA_TO_DEVICE;

        if (blk_integrity_rq(rq) &&
            sd_dif_prepare(rq, block, sdp->sector_size) == -EIO)
            goto out;

    } else if (rq_data_dir(rq) == READ) {
        SCpnt->cmnd[0] = READ_6;
        SCpnt->sc_data_direction = DMA_FROM_DEVICE;
    } else {
        scmd_printk(KERN_ERR, SCpnt, "Unknown command %x\n", rq->cmd_flags);
        goto out;
    }

    SCSI_LOG_HLQUEUE(2, scmd_printk(KERN_INFO, SCpnt,
                    "%s %d/%u 512 byte blocks.\n",
                    (rq_data_dir(rq) == WRITE) ?
                    "writing" : "reading", this_count,
                    blk_rq_sectors(rq)));

    /* Set RDPROTECT/WRPROTECT if disk is formatted with DIF */
    host_dif = scsi_host_dif_capable(sdp->host, sdkp->protection_type);
    if (host_dif)
        protect = 1 << 5;
    else
        protect = 0;

    if (host_dif == SD_DIF_TYPE2_PROTECTION) {
        SCpnt->cmnd = mempool_alloc(sd_cdb_pool, GFP_ATOMIC);

        if (unlikely(SCpnt->cmnd == NULL)) {
            ret = BLKPREP_DEFER;
            goto out;
        }

        SCpnt->cmd_len = SD_EXT_CDB_SIZE;
        memset(SCpnt->cmnd, 0, SCpnt->cmd_len);
        SCpnt->cmnd[0] = VARIABLE_LENGTH_CMD;
        SCpnt->cmnd[7] = 0x18;
        SCpnt->cmnd[9] = (rq_data_dir(rq) == READ) ? READ_32 : WRITE_32;
        SCpnt->cmnd[10] = protect | (blk_fua_rq(rq) ? 0x8 : 0);

        /* LBA */
        SCpnt->cmnd[12] = sizeof(block) > 4 ? (unsigned char) (block >> 56) & 0xff : 0;
        SCpnt->cmnd[13] = sizeof(block) > 4 ? (unsigned char) (block >> 48) & 0xff : 0;
        SCpnt->cmnd[14] = sizeof(block) > 4 ? (unsigned char) (block >> 40) & 0xff : 0;
        SCpnt->cmnd[15] = sizeof(block) > 4 ? (unsigned char) (block >> 32) & 0xff : 0;
        SCpnt->cmnd[16] = (unsigned char) (block >> 24) & 0xff;
        SCpnt->cmnd[17] = (unsigned char) (block >> 16) & 0xff;
        SCpnt->cmnd[18] = (unsigned char) (block >> 8) & 0xff;
        SCpnt->cmnd[19] = (unsigned char) block & 0xff;

        /* Expected Indirect LBA */
        SCpnt->cmnd[20] = (unsigned char) (block >> 24) & 0xff;
        SCpnt->cmnd[21] = (unsigned char) (block >> 16) & 0xff;
        SCpnt->cmnd[22] = (unsigned char) (block >> 8) & 0xff;
        SCpnt->cmnd[23] = (unsigned char) block & 0xff;

        /* Transfer length */
        SCpnt->cmnd[28] = (unsigned char) (this_count >> 24) & 0xff;
        SCpnt->cmnd[29] = (unsigned char) (this_count >> 16) & 0xff;
        SCpnt->cmnd[30] = (unsigned char) (this_count >> 8) & 0xff;
        SCpnt->cmnd[31] = (unsigned char) this_count & 0xff;
    } else if (block > 0xffffffff) {
        SCpnt->cmnd[0] += READ_16 - READ_6;
        SCpnt->cmnd[1] = protect | (blk_fua_rq(rq) ? 0x8 : 0);
        SCpnt->cmnd[2] = sizeof(block) > 4 ? (unsigned char) (block >> 56) & 0xff : 0;
        SCpnt->cmnd[3] = sizeof(block) > 4 ? (unsigned char) (block >> 48) & 0xff : 0;
        SCpnt->cmnd[4] = sizeof(block) > 4 ? (unsigned char) (block >> 40) & 0xff : 0;
        SCpnt->cmnd[5] = sizeof(block) > 4 ? (unsigned char) (block >> 32) & 0xff : 0;
        SCpnt->cmnd[6] = (unsigned char) (block >> 24) & 0xff;
        SCpnt->cmnd[7] = (unsigned char) (block >> 16) & 0xff;
        SCpnt->cmnd[8] = (unsigned char) (block >> 8) & 0xff;
        SCpnt->cmnd[9] = (unsigned char) block & 0xff;
        SCpnt->cmnd[10] = (unsigned char) (this_count >> 24) & 0xff;
        SCpnt->cmnd[11] = (unsigned char) (this_count >> 16) & 0xff;
        SCpnt->cmnd[12] = (unsigned char) (this_count >> 8) & 0xff;
        SCpnt->cmnd[13] = (unsigned char) this_count & 0xff;
        SCpnt->cmnd[14] = SCpnt->cmnd[15] = 0;
    } else if ((this_count > 0xff) || (block > 0x1fffff) ||
           scsi_device_protection(SCpnt->device) ||
           SCpnt->device->use_10_for_rw) {
        if (this_count > 0xffff)
            this_count = 0xffff;

        SCpnt->cmnd[0] += READ_10 - READ_6;
        SCpnt->cmnd[1] = protect | (blk_fua_rq(rq) ? 0x8 : 0);
        SCpnt->cmnd[2] = (unsigned char) (block >> 24) & 0xff;
        SCpnt->cmnd[3] = (unsigned char) (block >> 16) & 0xff;
        SCpnt->cmnd[4] = (unsigned char) (block >> 8) & 0xff;
        SCpnt->cmnd[5] = (unsigned char) block & 0xff;
        SCpnt->cmnd[6] = SCpnt->cmnd[9] = 0;
        SCpnt->cmnd[7] = (unsigned char) (this_count >> 8) & 0xff;
        SCpnt->cmnd[8] = (unsigned char) this_count & 0xff;
    } else {
        if (unlikely(blk_fua_rq(rq))) {
            /*
             * This happens only if this drive failed
             * 10byte rw command with ILLEGAL_REQUEST
             * during operation and thus turned off
             * use_10_for_rw.
             */
            scmd_printk(KERN_ERR, SCpnt,
                    "FUA write on READ/WRITE(6) drive\n");
            goto out;
        }

        SCpnt->cmnd[1] |= (unsigned char) ((block >> 16) & 0x1f);
        SCpnt->cmnd[2] = (unsigned char) ((block >> 8) & 0xff);
        SCpnt->cmnd[3] = (unsigned char) block & 0xff;
        SCpnt->cmnd[4] = (unsigned char) this_count;
        SCpnt->cmnd[5] = 0;
    }
    SCpnt->sdb.length = this_count * sdp->sector_size;

    /* If DIF or DIX is enabled, tell HBA how to handle request */
    if (host_dif || scsi_prot_sg_count(SCpnt))
        sd_prot_op(SCpnt, host_dif);

    /*
     * We shouldn't disconnect in the middle of a sector, so with a dumb
     * host adapter, it's safe to assume that we can at least transfer
     * this many bytes between each connect / disconnect.
     */
    SCpnt->transfersize = sdp->sector_size;
    SCpnt->underflow = this_count << 9;
    SCpnt->allowed = SD_MAX_RETRIES;

    /*
     * This indicates that the command is ready from our end to be
     * queued.
     */
    ret = BLKPREP_OK;
 out:
    return scsi_prep_return(q, rq, ret);
}

/**
 *  sd_open - open a scsi disk device
 *  @inode: only i_rdev member may be used
 *  @filp: only f_mode and f_flags may be used
 *
 *  Returns 0 if successful. Returns a negated errno value in case
 *  of error.
 *
 *  Note: This can be called from a user context (e.g. fsck(1) )
 *  or from within the kernel (e.g. as a result of a mount(1) ).
 *  In the latter case @inode and @filp carry an abridged amount
 *  of information as noted above.
 **/
static int sd_open(struct block_device *bdev, fmode_t mode)
{
    struct scsi_disk *sdkp = scsi_disk_get(bdev->bd_disk);
    struct scsi_device *sdev;
    int retval;

    if (!sdkp)
        return -ENXIO;

    SCSI_LOG_HLQUEUE(3, sd_printk(KERN_INFO, sdkp, "sd_open\n"));

    sdev = sdkp->device;

    /*
     * If the device is in error recovery, wait until it is done.
     * If the device is offline, then disallow any access to it.
     */
    retval = -ENXIO;
    if (!scsi_block_when_processing_errors(sdev))
        goto error_out;

    if (sdev->removable || sdkp->write_prot)
        check_disk_change(bdev);

    /*
     * If the drive is empty, just let the open fail.
     */
    retval = -ENOMEDIUM;
    if (sdev->removable && !sdkp->media_present && !(mode & FMODE_NDELAY))
        goto error_out;

    /*
     * If the device has the write protect tab set, have the open fail
     * if the user expects to be able to write to the thing.
     */
    retval = -EROFS;
    if (sdkp->write_prot && (mode & FMODE_WRITE))
        goto error_out;

    /*
     * It is possible that the disk changing stuff resulted in
     * the device being taken offline.  If this is the case,
     * report this to the user, and don't pretend that the
     * open actually succeeded.
     */
    retval = -ENXIO;
    if (!scsi_device_online(sdev))
        goto error_out;

    if (!sdkp->openers++ && sdev->removable) {
        if (scsi_block_when_processing_errors(sdev))
            scsi_set_medium_removal(sdev, SCSI_REMOVAL_PREVENT);
    }

    return 0;

error_out:
    scsi_disk_put(sdkp);
    return retval;
}

/**
 *  sd_release - invoked when the (last) close(2) is called on this
 *  scsi disk.
 *  @inode: only i_rdev member may be used
 *  @filp: only f_mode and f_flags may be used
 *
 *  Returns 0.
 *
 *  Note: may block (uninterruptible) if error recovery is underway
 *  on this disk.
 **/
static int sd_release(struct gendisk *disk, fmode_t mode)
{
    struct scsi_disk *sdkp = scsi_disk(disk);
    struct scsi_device *sdev = sdkp->device;

    SCSI_LOG_HLQUEUE(3, sd_printk(KERN_INFO, sdkp, "sd_release\n"));

    if (!--sdkp->openers && sdev->removable) {
        if (scsi_block_when_processing_errors(sdev))
            scsi_set_medium_removal(sdev, SCSI_REMOVAL_ALLOW);
    }

    /*
     * XXX and what if there are packets in flight and this close()
     * XXX is followed by a "rmmod sd_mod"?
     */
    scsi_disk_put(sdkp);
    return 0;
}

static int sd_getgeo(struct block_device *bdev, struct hd_geometry *geo)
{
    struct scsi_disk *sdkp = scsi_disk(bdev->bd_disk);
    struct scsi_device *sdp = sdkp->device;
    struct Scsi_Host *host = sdp->host;
    int diskinfo[4];

    /* default to most commonly used values */
        diskinfo[0] = 0x40; /* 1 << 6 */
        diskinfo[1] = 0x20; /* 1 << 5 */
        diskinfo[2] = sdkp->capacity >> 11;

    /* override with calculated, extended default, or driver values */
    if (host->hostt->bios_param)
        host->hostt->bios_param(sdp, bdev, sdkp->capacity, diskinfo);
    else
        scsicam_bios_param(bdev, sdkp->capacity, diskinfo);

    geo->heads = diskinfo[0];
    geo->sectors = diskinfo[1];
    geo->cylinders = diskinfo[2];
    return 0;
}

/**
 *  sd_ioctl - process an ioctl
 *  @inode: only i_rdev/i_bdev members may be used
 *  @filp: only f_mode and f_flags may be used
 *  @cmd: ioctl command number
 *  @arg: this is third argument given to ioctl(2) system call.
 *  Often contains a pointer.
 *
 *  Returns 0 if successful (some ioctls return postive numbers on
 *  success as well). Returns a negated errno value in case of error.
 *
 *  Note: most ioctls are forward onto the block subsystem or further
 *  down in the scsi subsystem.
 **/
static int sd_ioctl(struct block_device *bdev, fmode_t mode,
            unsigned int cmd, unsigned long arg)
{
    struct gendisk *disk = bdev->bd_disk;
    struct scsi_device *sdp = scsi_disk(disk)->device;
    void __user *p = (void __user *)arg;
    int error;

    SCSI_LOG_IOCTL(1, printk("sd_ioctl: disk=%s, cmd=0x%x\n",
                        disk->disk_name, cmd));

    /*
     * If we are in the middle of error recovery, don't let anyone
     * else try and use this device.  Also, if error recovery fails, it
     * may try and take the device offline, in which case all further
     * access to the device is prohibited.
     */
    error = scsi_nonblockable_ioctl(sdp, cmd, p,
                    (mode & FMODE_NDELAY) != 0);
    if (!scsi_block_when_processing_errors(sdp) || !error)
        return error;

    /*
     * Send SCSI addressing ioctls directly to mid level, send other
     * ioctls to block level and then onto mid level if they can't be
     * resolved.
     */
    switch (cmd) {
        case SCSI_IOCTL_GET_IDLUN:
        case SCSI_IOCTL_GET_BUS_NUMBER:
            return scsi_ioctl(sdp, cmd, p);
        default:
            error = scsi_cmd_ioctl(disk->queue, disk, mode, cmd, p);
            if (error != -ENOTTY)
                return error;
    }
    return scsi_ioctl(sdp, cmd, p);
}

static void set_media_not_present(struct scsi_disk *sdkp)
{
    sdkp->media_present = 0;
    sdkp->capacity = 0;
    sdkp->device->changed = 1;
}

/**
 *  sd_media_changed - check if our medium changed
 *  @disk: kernel device descriptor
 *
 *  Returns 0 if not applicable or no change; 1 if change
 *
 *  Note: this function is invoked from the block subsystem.
 **/
static int sd_media_changed(struct gendisk *disk)
{
    struct scsi_disk *sdkp = scsi_disk(disk);
    struct scsi_device *sdp = sdkp->device;
    struct scsi_sense_hdr *sshdr = NULL;
    int retval;

    SCSI_LOG_HLQUEUE(3, sd_printk(KERN_INFO, sdkp, "sd_media_changed\n"));

    if (!sdp->removable)
        return 0;

    /*
     * If the device is offline, don't send any commands - just pretend as
     * if the command failed.  If the device ever comes back online, we
     * can deal with it then.  It is only because of unrecoverable errors
     * that we would ever take a device offline in the first place.
     */
    if (!scsi_device_online(sdp)) {
        set_media_not_present(sdkp);
        retval = 1;
        goto out;
    }

    /*
     * Using TEST_UNIT_READY enables differentiation between drive with
     * no cartridge loaded - NOT READY, drive with changed cartridge -
     * UNIT ATTENTION, or with same cartridge - GOOD STATUS.
     *
     * Drives that auto spin down. eg iomega jaz 1G, will be started
     * by sd_spinup_disk() from sd_revalidate_disk(), which happens whenever
     * sd_revalidate() is called.
     */
    retval = -ENODEV;

    if (scsi_block_when_processing_errors(sdp)) {
        sshdr  = kzalloc(sizeof(*sshdr), GFP_KERNEL);
        retval = scsi_test_unit_ready(sdp, SD_TIMEOUT, SD_MAX_RETRIES,
                          sshdr);
    }

    /*
     * Unable to test, unit probably not ready.   This usually
     * means there is no disc in the drive.  Mark as changed,
     * and we will figure it out later once the drive is
     * available again.
     */
    if (retval || (scsi_sense_valid(sshdr) &&
               /* 0x3a is medium not present */
               sshdr->asc == 0x3a)) {
        set_media_not_present(sdkp);
        retval = 1;
        goto out;
    }

    /*
     * For removable scsi disk we have to recognise the presence
     * of a disk in the drive. This is kept in the struct scsi_disk
     * struct and tested at open !  Daniel Roche (dan@lectra.fr)
     */
    sdkp->media_present = 1;

    retval = sdp->changed;
    sdp->changed = 0;
out:
    if (retval != sdkp->previous_state)
        sdev_evt_send_simple(sdp, SDEV_EVT_MEDIA_CHANGE, GFP_KERNEL);
    sdkp->previous_state = retval;
    kfree(sshdr);
    return retval;
}

static int sd_sync_cache(struct scsi_disk *sdkp)
{
    int retries, res;
    struct scsi_device *sdp = sdkp->device;
    struct scsi_sense_hdr sshdr;

    if (!scsi_device_online(sdp))
        return -ENODEV;


    for (retries = 3; retries > 0; --retries) {
        unsigned char cmd[10] = { 0 };

        cmd[0] = SYNCHRONIZE_CACHE;
        /*
         * Leave the rest of the command zero to indicate
         * flush everything.
         */
        res = scsi_execute_req(sdp, cmd, DMA_NONE, NULL, 0, &sshdr,
                       SD_TIMEOUT, SD_MAX_RETRIES, NULL);
        if (res == 0)
            break;
    }

    if (res) {
        sd_print_result(sdkp, res);
        if (driver_byte(res) & DRIVER_SENSE)
            sd_print_sense_hdr(sdkp, &sshdr);
    }

    if (res)
        return -EIO;
    return 0;
}

static void sd_prepare_flush(struct request_queue *q, struct request *rq)
{
    rq->cmd_type = REQ_TYPE_BLOCK_PC;
    rq->timeout = SD_TIMEOUT;
    rq->cmd[0] = SYNCHRONIZE_CACHE;
    rq->cmd_len = 10;
}

static void sd_rescan(struct device *dev)
{
    struct scsi_disk *sdkp = scsi_disk_get_from_dev(dev);

    if (sdkp) {
        revalidate_disk(sdkp->disk);
        scsi_disk_put(sdkp);
    }
}


#ifdef CONFIG_COMPAT
/*
 * This gets directly called from VFS. When the ioctl
 * is not recognized we go back to the other translation paths.
 */
static int sd_compat_ioctl(struct block_device *bdev, fmode_t mode,
               unsigned int cmd, unsigned long arg)
{
    struct scsi_device *sdev = scsi_disk(bdev->bd_disk)->device;

    /*
     * If we are in the middle of error recovery, don't let anyone
     * else try and use this device.  Also, if error recovery fails, it
     * may try and take the device offline, in which case all further
     * access to the device is prohibited.
     */
    if (!scsi_block_when_processing_errors(sdev))
        return -ENODEV;

    if (sdev->host->hostt->compat_ioctl) {
        int ret;

        ret = sdev->host->hostt->compat_ioctl(sdev, cmd, (void __user *)arg);

        return ret;
    }

    /*
     * Let the static ioctl translation table take care of it.
     */
    return -ENOIOCTLCMD;
}
#endif

static const struct block_device_operations sd_fops = {
    .owner          = THIS_MODULE,
    .open           = sd_open,
    .release        = sd_release,
    .locked_ioctl       = sd_ioctl,
    .getgeo         = sd_getgeo,
#ifdef CONFIG_COMPAT
    .compat_ioctl       = sd_compat_ioctl,
#endif
    .media_changed      = sd_media_changed,
    .revalidate_disk    = sd_revalidate_disk,
};

static unsigned int sd_completed_bytes(struct scsi_cmnd *scmd)
{
    u64 start_lba = blk_rq_pos(scmd->request);
    u64 end_lba = blk_rq_pos(scmd->request) + (scsi_bufflen(scmd) / 512);
    u64 bad_lba;
    int info_valid;

    if (!blk_fs_request(scmd->request))
        return 0;

    info_valid = scsi_get_sense_info_fld(scmd->sense_buffer,
                         SCSI_SENSE_BUFFERSIZE,
                         &bad_lba);
    if (!info_valid)
        return 0;

    if (scsi_bufflen(scmd) <= scmd->device->sector_size)
        return 0;

    if (scmd->device->sector_size < 512) {
        /* only legitimate sector_size here is 256 */
        start_lba <<= 1;
        end_lba <<= 1;
    } else {
        /* be careful ... don't want any overflows */
        u64 factor = scmd->device->sector_size / 512;
        do_div(start_lba, factor);
        do_div(end_lba, factor);
    }

    /* The bad lba was reported incorrectly, we have no idea where
     * the error is.
     */
    if (bad_lba < start_lba  || bad_lba >= end_lba)
        return 0;

    /* This computation should always be done in terms of
     * the resolution of the device's medium.
     */
    return (bad_lba - start_lba) * scmd->device->sector_size;
}

/**
 *  sd_done - bottom half handler: called when the lower level
 *  driver has completed (successfully or otherwise) a scsi command.
 *  @SCpnt: mid-level's per command structure.
 *
 *  Note: potentially run from within an ISR. Must not block.
 **/
static int sd_done(struct scsi_cmnd *SCpnt)
{
    int result = SCpnt->result;
    unsigned int good_bytes = result ? 0 : scsi_bufflen(SCpnt);
    struct scsi_sense_hdr sshdr;
    struct scsi_disk *sdkp = scsi_disk(SCpnt->request->rq_disk);
    int sense_valid = 0;
    int sense_deferred = 0;

    if (result) {
        sense_valid = scsi_command_normalize_sense(SCpnt, &sshdr);
        if (sense_valid)
            sense_deferred = scsi_sense_is_deferred(&sshdr);
    }
#ifdef CONFIG_SCSI_LOGGING
    SCSI_LOG_HLCOMPLETE(1, scsi_print_result(SCpnt));
    if (sense_valid) {
        SCSI_LOG_HLCOMPLETE(1, scmd_printk(KERN_INFO, SCpnt,
                           "sd_done: sb[respc,sk,asc,"
                           "ascq]=%x,%x,%x,%x\n",
                           sshdr.response_code,
                           sshdr.sense_key, sshdr.asc,
                           sshdr.ascq));
    }
#endif
    if (driver_byte(result) != DRIVER_SENSE &&
        (!sense_valid || sense_deferred))
        goto out;

    switch (sshdr.sense_key) {
    case HARDWARE_ERROR:
    case MEDIUM_ERROR:
        good_bytes = sd_completed_bytes(SCpnt);
        break;
    case RECOVERED_ERROR:
        good_bytes = scsi_bufflen(SCpnt);
        break;
    case NO_SENSE:
        /* This indicates a false check condition, so ignore it.  An
         * unknown amount of data was transferred so treat it as an
         * error.
         */
        scsi_print_sense("sd", SCpnt);
        SCpnt->result = 0;
        memset(SCpnt->sense_buffer, 0, SCSI_SENSE_BUFFERSIZE);
        break;
    case ABORTED_COMMAND:
        if (sshdr.asc == 0x10) { /* DIF: Disk detected corruption */
            scsi_print_result(SCpnt);
            scsi_print_sense("sd", SCpnt);
            good_bytes = sd_completed_bytes(SCpnt);
        }
        break;
    case ILLEGAL_REQUEST:
        if (sshdr.asc == 0x10) { /* DIX: HBA detected corruption */
            scsi_print_result(SCpnt);
            scsi_print_sense("sd", SCpnt);
            good_bytes = sd_completed_bytes(SCpnt);
        }
        break;
    default:
        break;
    }
 out:
    if (rq_data_dir(SCpnt->request) == READ && scsi_prot_sg_count(SCpnt))
        sd_dif_complete(SCpnt, good_bytes);

    if (scsi_host_dif_capable(sdkp->device->host, sdkp->protection_type)
        == SD_DIF_TYPE2_PROTECTION && SCpnt->cmnd != SCpnt->request->cmd)
        mempool_free(SCpnt->cmnd, sd_cdb_pool);

    return good_bytes;
}

static int media_not_present(struct scsi_disk *sdkp,
                 struct scsi_sense_hdr *sshdr)
{

    if (!scsi_sense_valid(sshdr))
        return 0;
    /* not invoked for commands that could return deferred errors */
    if (sshdr->sense_key != NOT_READY &&
        sshdr->sense_key != UNIT_ATTENTION)
        return 0;
    if (sshdr->asc != 0x3A) /* medium not present */
        return 0;

    set_media_not_present(sdkp);
    return 1;
}

/*
 * spinup disk - called only in sd_revalidate_disk()
 */
static void
sd_spinup_disk(struct scsi_disk *sdkp)
{
    unsigned char cmd[10];
    unsigned long spintime_expire = 0;
    int retries, spintime;
    unsigned int the_result;
    struct scsi_sense_hdr sshdr;
    int sense_valid = 0;

    spintime = 0;

    /* Spin up drives, as required.  Only do this at boot time */
    /* Spinup needs to be done for module loads too. */
    do {
        retries = 0;

        do {
            cmd[0] = TEST_UNIT_READY;
            memset((void *) &cmd[1], 0, 9);

            the_result = scsi_execute_req(sdkp->device, cmd,
                              DMA_NONE, NULL, 0,
                              &sshdr, SD_TIMEOUT,
                              SD_MAX_RETRIES, NULL);

            /*
             * If the drive has indicated to us that it
             * doesn't have any media in it, don't bother
             * with any more polling.
             */
            if (media_not_present(sdkp, &sshdr))
                return;

            if (the_result)
                sense_valid = scsi_sense_valid(&sshdr);
            retries++;
        } while (retries < 3 &&
             (!scsi_status_is_good(the_result) ||
              ((driver_byte(the_result) & DRIVER_SENSE) &&
              sense_valid && sshdr.sense_key == UNIT_ATTENTION)));

        if ((driver_byte(the_result) & DRIVER_SENSE) == 0) {
            /* no sense, TUR either succeeded or failed
             * with a status error */
            if(!spintime && !scsi_status_is_good(the_result)) {
                sd_printk(KERN_NOTICE, sdkp, "Unit Not Ready\n");
                sd_print_result(sdkp, the_result);
            }
            break;
        }

        /*
         * The device does not want the automatic start to be issued.
         */
        if (sdkp->device->no_start_on_add)
            break;

        if (sense_valid && sshdr.sense_key == NOT_READY) {
            if (sshdr.asc == 4 && sshdr.ascq == 3)
                break;  /* manual intervention required */
            if (sshdr.asc == 4 && sshdr.ascq == 0xb)
                break;  /* standby */
            if (sshdr.asc == 4 && sshdr.ascq == 0xc)
                break;  /* unavailable */
            /*
             * Issue command to spin up drive when not ready
             */
            if (!spintime) {
                sd_printk(KERN_NOTICE, sdkp, "Spinning up disk...");
                cmd[0] = START_STOP;
                cmd[1] = 1; /* Return immediately */
                memset((void *) &cmd[2], 0, 8);
                cmd[4] = 1; /* Start spin cycle */
                if (sdkp->device->start_stop_pwr_cond)
                    cmd[4] |= 1 << 4;
                scsi_execute_req(sdkp->device, cmd, DMA_NONE,
                         NULL, 0, &sshdr,
                         SD_TIMEOUT, SD_MAX_RETRIES,
                         NULL);
                spintime_expire = jiffies + 100 * HZ;
                spintime = 1;
            }
            /* Wait 1 second for next try */
            msleep(1000);
            printk(".");

        /*
         * Wait for USB flash devices with slow firmware.
         * Yes, this sense key/ASC combination shouldn't
         * occur here.  It's characteristic of these devices.
         */
        } else if (sense_valid &&
                sshdr.sense_key == UNIT_ATTENTION &&
                sshdr.asc == 0x28) {
            if (!spintime) {
                spintime_expire = jiffies + 5 * HZ;
                spintime = 1;
            }
            /* Wait 1 second for next try */
            msleep(1000);
        } else {
            /* we don't understand the sense code, so it's
             * probably pointless to loop */
            if(!spintime) {
                sd_printk(KERN_NOTICE, sdkp, "Unit Not Ready\n");
                sd_print_sense_hdr(sdkp, &sshdr);
            }
            break;
        }

    } while (spintime && time_before_eq(jiffies, spintime_expire));

    if (spintime) {
        if (scsi_status_is_good(the_result))
            printk("ready\n");
        else
            printk("not responding...\n");
    }
}


/*
 * Determine whether disk supports Data Integrity Field.
 */
void sd_read_protection_type(struct scsi_disk *sdkp, unsigned char *buffer)
{
    struct scsi_device *sdp = sdkp->device;
    u8 type;

    if (scsi_device_protection(sdp) == 0 || (buffer[12] & 1) == 0)
        return;

    type = ((buffer[12] >> 1) & 7) + 1; /* P_TYPE 0 = Type 1 */

    if (type == sdkp->protection_type || !sdkp->first_scan)
        return;

    sdkp->protection_type = type;

    if (type > SD_DIF_TYPE3_PROTECTION) {
        sd_printk(KERN_ERR, sdkp, "formatted with unsupported " \
              "protection type %u. Disabling disk!\n", type);
        sdkp->capacity = 0;
        return;
    }

    if (scsi_host_dif_capable(sdp->host, type))
        sd_printk(KERN_NOTICE, sdkp,
              "Enabling DIF Type %u protection\n", type);
    else
        sd_printk(KERN_NOTICE, sdkp,
              "Disabling DIF Type %u protection\n", type);
}

static void read_capacity_error(struct scsi_disk *sdkp, struct scsi_device *sdp,
            struct scsi_sense_hdr *sshdr, int sense_valid,
            int the_result)
{
    sd_print_result(sdkp, the_result);
    if (driver_byte(the_result) & DRIVER_SENSE)
        sd_print_sense_hdr(sdkp, sshdr);
    else
        sd_printk(KERN_NOTICE, sdkp, "Sense not available.\n");

    /*
     * Set dirty bit for removable devices if not ready -
     * sometimes drives will not report this properly.
     */
    if (sdp->removable &&
        sense_valid && sshdr->sense_key == NOT_READY)
        sdp->changed = 1;

    /*
     * We used to set media_present to 0 here to indicate no media
     * in the drive, but some drives fail read capacity even with
     * media present, so we can't do that.
     */
    sdkp->capacity = 0; /* unknown mapped to zero - as usual */
}

#define RC16_LEN 32
#if RC16_LEN > SD_BUF_SIZE
#error RC16_LEN must not be more than SD_BUF_SIZE
#endif

static int read_capacity_16(struct scsi_disk *sdkp, struct scsi_device *sdp,
                        unsigned char *buffer)
{
    unsigned char cmd[16];
    struct scsi_sense_hdr sshdr;
    int sense_valid = 0;
    int the_result;
    int retries = 3;
    unsigned int alignment;
    unsigned long long lba;
    unsigned sector_size;

    do {
        memset(cmd, 0, 16);
        cmd[0] = SERVICE_ACTION_IN;
        cmd[1] = SAI_READ_CAPACITY_16;
        cmd[13] = RC16_LEN;
        memset(buffer, 0, RC16_LEN);

        the_result = scsi_execute_req(sdp, cmd, DMA_FROM_DEVICE,
                    buffer, RC16_LEN, &sshdr,
                    SD_TIMEOUT, SD_MAX_RETRIES, NULL);

        if (media_not_present(sdkp, &sshdr))
            return -ENODEV;

        if (the_result) {
            sense_valid = scsi_sense_valid(&sshdr);
            if (sense_valid &&
                sshdr.sense_key == ILLEGAL_REQUEST &&
                (sshdr.asc == 0x20 || sshdr.asc == 0x24) &&
                sshdr.ascq == 0x00)
                /* Invalid Command Operation Code or
                 * Invalid Field in CDB, just retry
                 * silently with RC10 */
                return -EINVAL;
        }
        retries--;

    } while (the_result && retries);

    if (the_result) {
        sd_printk(KERN_NOTICE, sdkp, "READ CAPACITY(16) failed\n");
        read_capacity_error(sdkp, sdp, &sshdr, sense_valid, the_result);
        return -EINVAL;
    }

    sector_size = get_unaligned_be32(&buffer[8]);
    lba = get_unaligned_be64(&buffer[0]);

    sd_read_protection_type(sdkp, buffer);

    if ((sizeof(sdkp->capacity) == 4) && (lba >= 0xffffffffULL)) {
        sd_printk(KERN_ERR, sdkp, "Too big for this kernel. Use a "
            "kernel compiled with support for large block "
            "devices.\n");
        sdkp->capacity = 0;
        return -EOVERFLOW;
    }

    /* Logical blocks per physical block exponent */
    sdkp->hw_sector_size = (1 << (buffer[13] & 0xf)) * sector_size;

    /* Lowest aligned logical block */
    alignment = ((buffer[14] & 0x3f) << 8 | buffer[15]) * sector_size;
    blk_queue_alignment_offset(sdp->request_queue, alignment);
    if (alignment && sdkp->first_scan)
        sd_printk(KERN_NOTICE, sdkp,
              "physical block alignment offset: %u\n", alignment);

    if (buffer[14] & 0x80) { /* TPE */
        struct request_queue *q = sdp->request_queue;

        sdkp->thin_provisioning = 1;
        q->limits.discard_granularity = sdkp->hw_sector_size;
        q->limits.max_discard_sectors = 0xffffffff;

        if (buffer[14] & 0x40) /* TPRZ */
            q->limits.discard_zeroes_data = 1;

        queue_flag_set_unlocked(QUEUE_FLAG_DISCARD, q);
    }

    sdkp->capacity = lba + 1;
    return sector_size;
}

static int read_capacity_10(struct scsi_disk *sdkp, struct scsi_device *sdp,
                        unsigned char *buffer)
{
    unsigned char cmd[16];
    struct scsi_sense_hdr sshdr;
    int sense_valid = 0;
    int the_result;
    int retries = 3;
    sector_t lba;
    unsigned sector_size;

    do {
        cmd[0] = READ_CAPACITY;
        memset(&cmd[1], 0, 9);
        memset(buffer, 0, 8);

        the_result = scsi_execute_req(sdp, cmd, DMA_FROM_DEVICE,
                    buffer, 8, &sshdr,
                    SD_TIMEOUT, SD_MAX_RETRIES, NULL);

        if (media_not_present(sdkp, &sshdr))
            return -ENODEV;

        if (the_result)
            sense_valid = scsi_sense_valid(&sshdr);
        retries--;

    } while (the_result && retries);

    if (the_result) {
        sd_printk(KERN_NOTICE, sdkp, "READ CAPACITY failed\n");
        read_capacity_error(sdkp, sdp, &sshdr, sense_valid, the_result);
        return -EINVAL;
    }

    sector_size = get_unaligned_be32(&buffer[4]);
    lba = get_unaligned_be32(&buffer[0]);

    if ((sizeof(sdkp->capacity) == 4) && (lba == 0xffffffff)) {
        sd_printk(KERN_ERR, sdkp, "Too big for this kernel. Use a "
            "kernel compiled with support for large block "
            "devices.\n");
        sdkp->capacity = 0;
        return -EOVERFLOW;
    }

    sdkp->capacity = lba + 1;
    sdkp->hw_sector_size = sector_size;
    return sector_size;
}

static int sd_try_rc16_first(struct scsi_device *sdp)
{
    if (sdp->scsi_level > SCSI_SPC_2)
        return 1;
    if (scsi_device_protection(sdp))
        return 1;
    return 0;
}

/*
 * read disk capacity
 */
static void
sd_read_capacity(struct scsi_disk *sdkp, unsigned char *buffer)
{
    int sector_size;
    struct scsi_device *sdp = sdkp->device;
    sector_t old_capacity = sdkp->capacity;

    if (sd_try_rc16_first(sdp)) {
        sector_size = read_capacity_16(sdkp, sdp, buffer);
        if (sector_size == -EOVERFLOW)
            goto got_data;
        if (sector_size == -ENODEV)
            return;
        if (sector_size < 0)
            sector_size = read_capacity_10(sdkp, sdp, buffer);
        if (sector_size < 0)
            return;
    } else {
        sector_size = read_capacity_10(sdkp, sdp, buffer);
        if (sector_size == -EOVERFLOW)
            goto got_data;
        if (sector_size < 0)
            return;
        if ((sizeof(sdkp->capacity) > 4) &&
            (sdkp->capacity > 0xffffffffULL)) {
            int old_sector_size = sector_size;
            sd_printk(KERN_NOTICE, sdkp, "Very big device. "
                    "Trying to use READ CAPACITY(16).\n");
            sector_size = read_capacity_16(sdkp, sdp, buffer);
            if (sector_size < 0) {
                sd_printk(KERN_NOTICE, sdkp,
                    "Using 0xffffffff as device size\n");
                sdkp->capacity = 1 + (sector_t) 0xffffffff;
                sector_size = old_sector_size;
                goto got_data;
            }
        }
    }

    /* Some devices are known to return the total number of blocks,
     * not the highest block number.  Some devices have versions
     * which do this and others which do not.  Some devices we might
     * suspect of doing this but we don't know for certain.
     *
     * If we know the reported capacity is wrong, decrement it.  If
     * we can only guess, then assume the number of blocks is even
     * (usually true but not always) and err on the side of lowering
     * the capacity.
     */
    if (sdp->fix_capacity ||
        (sdp->guess_capacity && (sdkp->capacity & 0x01))) {
        sd_printk(KERN_INFO, sdkp, "Adjusting the sector count "
                "from its reported value: %llu\n",
                (unsigned long long) sdkp->capacity);
        --sdkp->capacity;
    }

got_data:
    if (sector_size == 0) {
        sector_size = 512;
        sd_printk(KERN_NOTICE, sdkp, "Sector size 0 reported, "
              "assuming 512.\n");
    }

    if (sector_size != 512 &&
        sector_size != 1024 &&
        sector_size != 2048 &&
        sector_size != 4096 &&
        sector_size != 256) {
        sd_printk(KERN_NOTICE, sdkp, "Unsupported sector size %d.\n",
              sector_size);
        /*
         * The user might want to re-format the drive with
         * a supported sectorsize.  Once this happens, it
         * would be relatively trivial to set the thing up.
         * For this reason, we leave the thing in the table.
         */
        sdkp->capacity = 0;
        /*
         * set a bogus sector size so the normal read/write
         * logic in the block layer will eventually refuse any
         * request on this device without tripping over power
         * of two sector size assumptions
         */
        sector_size = 512;
    }
    blk_queue_logical_block_size(sdp->request_queue, sector_size);

    {
        char cap_str_2[10], cap_str_10[10];
        u64 sz = (u64)sdkp->capacity << ilog2(sector_size);

        string_get_size(sz, STRING_UNITS_2, cap_str_2,
                sizeof(cap_str_2));
        string_get_size(sz, STRING_UNITS_10, cap_str_10,
                sizeof(cap_str_10));

        if (sdkp->first_scan || old_capacity != sdkp->capacity) {
            sd_printk(KERN_NOTICE, sdkp,
                  "%llu %d-byte logical blocks: (%s/%s)\n",
                  (unsigned long long)sdkp->capacity,
                  sector_size, cap_str_10, cap_str_2);

            if (sdkp->hw_sector_size != sector_size)
                sd_printk(KERN_NOTICE, sdkp,
                      "%u-byte physical blocks\n",
                      sdkp->hw_sector_size);
        }
    }

    /* Rescale capacity to 512-byte units */
    if (sector_size == 4096)
        sdkp->capacity <<= 3;
    else if (sector_size == 2048)
        sdkp->capacity <<= 2;
    else if (sector_size == 1024)
        sdkp->capacity <<= 1;
    else if (sector_size == 256)
        sdkp->capacity >>= 1;

    blk_queue_physical_block_size(sdp->request_queue, sdkp->hw_sector_size);
    sdkp->device->sector_size = sector_size;
}

/* called with buffer of length 512 */
static inline int
sd_do_mode_sense(struct scsi_device *sdp, int dbd, int modepage,
         unsigned char *buffer, int len, struct scsi_mode_data *data,
         struct scsi_sense_hdr *sshdr)
{
    return scsi_mode_sense(sdp, dbd, modepage, buffer, len,
                   SD_TIMEOUT, SD_MAX_RETRIES, data,
                   sshdr);
}

/*
 * read write protect setting, if possible - called only in sd_revalidate_disk()
 * called with buffer of length SD_BUF_SIZE
 */
static void
sd_read_write_protect_flag(struct scsi_disk *sdkp, unsigned char *buffer)
{
    int res;
    struct scsi_device *sdp = sdkp->device;
    struct scsi_mode_data data;
    int old_wp = sdkp->write_prot;

    set_disk_ro(sdkp->disk, 0);
    if (sdp->skip_ms_page_3f) {
        sd_printk(KERN_NOTICE, sdkp, "Assuming Write Enabled\n");
        return;
    }

    if (sdp->use_192_bytes_for_3f) {
        res = sd_do_mode_sense(sdp, 0, 0x3F, buffer, 192, &data, NULL);
    } else {
        /*
         * First attempt: ask for all pages (0x3F), but only 4 bytes.
         * We have to start carefully: some devices hang if we ask
         * for more than is available.
         */
        res = sd_do_mode_sense(sdp, 0, 0x3F, buffer, 4, &data, NULL);

        /*
         * Second attempt: ask for page 0 When only page 0 is
         * implemented, a request for page 3F may return Sense Key
         * 5: Illegal Request, Sense Code 24: Invalid field in
         * CDB.
         */
        if (!scsi_status_is_good(res))
            res = sd_do_mode_sense(sdp, 0, 0, buffer, 4, &data, NULL);

        /*
         * Third attempt: ask 255 bytes, as we did earlier.
         */
        if (!scsi_status_is_good(res))
            res = sd_do_mode_sense(sdp, 0, 0x3F, buffer, 255,
                           &data, NULL);
    }

    if (!scsi_status_is_good(res)) {
        sd_printk(KERN_WARNING, sdkp,
              "Test WP failed, assume Write Enabled\n");
    } else {
        sdkp->write_prot = ((data.device_specific & 0x80) != 0);
        set_disk_ro(sdkp->disk, sdkp->write_prot);
        if (sdkp->first_scan || old_wp != sdkp->write_prot) {
            sd_printk(KERN_NOTICE, sdkp, "Write Protect is %s\n",
                  sdkp->write_prot ? "on" : "off");
            sd_printk(KERN_DEBUG, sdkp,
                  "Mode Sense: %02x %02x %02x %02x\n",
                  buffer[0], buffer[1], buffer[2], buffer[3]);
        }
    }
}

/*
 * sd_read_cache_type - called only from sd_revalidate_disk()
 * called with buffer of length SD_BUF_SIZE
 */
static void
sd_read_cache_type(struct scsi_disk *sdkp, unsigned char *buffer)
{
    int len = 0, res;
    struct scsi_device *sdp = sdkp->device;

    int dbd;
    int modepage;
    struct scsi_mode_data data;
    struct scsi_sense_hdr sshdr;
    int old_wce = sdkp->WCE;
    int old_rcd = sdkp->RCD;
    int old_dpofua = sdkp->DPOFUA;

    if (sdp->skip_ms_page_8)
        goto defaults;

    if (sdp->type == TYPE_RBC) {
        modepage = 6;
        dbd = 8;
    } else {
        modepage = 8;
        dbd = 0;
    }

    /* cautiously ask */
    res = sd_do_mode_sense(sdp, dbd, modepage, buffer, 4, &data, &sshdr);

    if (!scsi_status_is_good(res))
        goto bad_sense;

    if (!data.header_length) {
        modepage = 6;
        sd_printk(KERN_ERR, sdkp, "Missing header in MODE_SENSE response\n");
    }

    /* that went OK, now ask for the proper length */
    len = data.length;

    /*
     * We're only interested in the first three bytes, actually.
     * But the data cache page is defined for the first 20.
     */
    if (len < 3)
        goto bad_sense;
    if (len > 20)
        len = 20;

    /* Take headers and block descriptors into account */
    len += data.header_length + data.block_descriptor_length;
    if (len > SD_BUF_SIZE)
        goto bad_sense;

    /* Get the data */
    res = sd_do_mode_sense(sdp, dbd, modepage, buffer, len, &data, &sshdr);

    if (scsi_status_is_good(res)) {
        int offset = data.header_length + data.block_descriptor_length;

        if (offset >= SD_BUF_SIZE - 2) {
            sd_printk(KERN_ERR, sdkp, "Malformed MODE SENSE response\n");
            goto defaults;
        }

        if ((buffer[offset] & 0x3f) != modepage) {
            sd_printk(KERN_ERR, sdkp, "Got wrong page\n");
            goto defaults;
        }

        if (modepage == 8) {
            sdkp->WCE = ((buffer[offset + 2] & 0x04) != 0);
            sdkp->RCD = ((buffer[offset + 2] & 0x01) != 0);
        } else {
            sdkp->WCE = ((buffer[offset + 2] & 0x01) == 0);
            sdkp->RCD = 0;
        }

        sdkp->DPOFUA = (data.device_specific & 0x10) != 0;
        if (sdkp->DPOFUA && !sdkp->device->use_10_for_rw) {
            sd_printk(KERN_NOTICE, sdkp,
                  "Uses READ/WRITE(6), disabling FUA\n");
            sdkp->DPOFUA = 0;
        }

        if (sdkp->first_scan || old_wce != sdkp->WCE ||
            old_rcd != sdkp->RCD || old_dpofua != sdkp->DPOFUA)
            sd_printk(KERN_NOTICE, sdkp,
                  "Write cache: %s, read cache: %s, %s\n",
                  sdkp->WCE ? "enabled" : "disabled",
                  sdkp->RCD ? "disabled" : "enabled",
                  sdkp->DPOFUA ? "supports DPO and FUA"
                  : "doesn't support DPO or FUA");

        return;
    }

bad_sense:
    if (scsi_sense_valid(&sshdr) &&
        sshdr.sense_key == ILLEGAL_REQUEST &&
        sshdr.asc == 0x24 && sshdr.ascq == 0x0)
        /* Invalid field in CDB */
        sd_printk(KERN_NOTICE, sdkp, "Cache data unavailable\n");
    else
        sd_printk(KERN_ERR, sdkp, "Asking for cache data failed\n");

defaults:
    sd_printk(KERN_ERR, sdkp, "Assuming drive cache: write through\n");
    sdkp->WCE = 0;
    sdkp->RCD = 0;
    sdkp->DPOFUA = 0;
}

/*
 * The ATO bit indicates whether the DIF application tag is available
 * for use by the operating system.
 */
void sd_read_app_tag_own(struct scsi_disk *sdkp, unsigned char *buffer)
{
    int res, offset;
    struct scsi_device *sdp = sdkp->device;
    struct scsi_mode_data data;
    struct scsi_sense_hdr sshdr;

    if (sdp->type != TYPE_DISK)
        return;

    if (sdkp->protection_type == 0)
        return;

    res = scsi_mode_sense(sdp, 1, 0x0a, buffer, 36, SD_TIMEOUT,
                  SD_MAX_RETRIES, &data, &sshdr);

    if (!scsi_status_is_good(res) || !data.header_length ||
        data.length < 6) {
        sd_printk(KERN_WARNING, sdkp,
              "getting Control mode page failed, assume no ATO\n");

        if (scsi_sense_valid(&sshdr))
            sd_print_sense_hdr(sdkp, &sshdr);

        return;
    }

    offset = data.header_length + data.block_descriptor_length;

    if ((buffer[offset] & 0x3f) != 0x0a) {
        sd_printk(KERN_ERR, sdkp, "ATO Got wrong page\n");
        return;
    }

    if ((buffer[offset + 5] & 0x80) == 0)
        return;

    sdkp->ATO = 1;

    return;
}

/**
 * sd_read_block_limits - Query disk device for preferred I/O sizes.
 * @disk: disk to query
 */
static void sd_read_block_limits(struct scsi_disk *sdkp)
{
    struct request_queue *q = sdkp->disk->queue;
    unsigned int sector_sz = sdkp->device->sector_size;
    char *buffer;

    /* Block Limits VPD */
    buffer = scsi_get_vpd_page(sdkp->device, 0xb0);

    if (buffer == NULL)
        return;

    blk_queue_io_min(sdkp->disk->queue,
             get_unaligned_be16(&buffer[6]) * sector_sz);
    blk_queue_io_opt(sdkp->disk->queue,
             get_unaligned_be32(&buffer[12]) * sector_sz);

    /* Thin provisioning enabled and page length indicates TP support */
    if (sdkp->thin_provisioning && buffer[3] == 0x3c) {
        unsigned int lba_count, desc_count, granularity;

        lba_count = get_unaligned_be32(&buffer[20]);
        desc_count = get_unaligned_be32(&buffer[24]);

        if (lba_count) {
            q->limits.max_discard_sectors =
                lba_count * sector_sz >> 9;

            if (desc_count)
                sdkp->unmap = 1;
        }

        granularity = get_unaligned_be32(&buffer[28]);

        if (granularity)
            q->limits.discard_granularity = granularity * sector_sz;

        if (buffer[32] & 0x80)
            q->limits.discard_alignment =
                get_unaligned_be32(&buffer[32]) & ~(1 << 31);
    }

    kfree(buffer);
}

/**
 * sd_read_block_characteristics - Query block dev. characteristics
 * @disk: disk to query
 */
static void sd_read_block_characteristics(struct scsi_disk *sdkp)
{
    char *buffer;
    u16 rot;

    /* Block Device Characteristics VPD */
    buffer = scsi_get_vpd_page(sdkp->device, 0xb1);

    if (buffer == NULL)
        return;

    rot = get_unaligned_be16(&buffer[4]);

    if (rot == 1)
        queue_flag_set_unlocked(QUEUE_FLAG_NONROT, sdkp->disk->queue);

    kfree(buffer);
}

static int sd_try_extended_inquiry(struct scsi_device *sdp)
{
    /*
     * Although VPD inquiries can go to SCSI-2 type devices,
     * some USB ones crash on receiving them, and the pages
     * we currently ask for are for SPC-3 and beyond
     */
    if (sdp->scsi_level > SCSI_SPC_2)
        return 1;
    return 0;
}

/**
 *  sd_revalidate_disk - called the first time a new disk is seen,
 *  performs disk spin up, read_capacity, etc.
 *  @disk: struct gendisk we care about
 **/
static int sd_revalidate_disk(struct gendisk *disk)
{
    struct scsi_disk *sdkp = scsi_disk(disk);
    struct scsi_device *sdp = sdkp->device;
    unsigned char *buffer;
    unsigned ordered;

    SCSI_LOG_HLQUEUE(3, sd_printk(KERN_INFO, sdkp,
                      "sd_revalidate_disk\n"));

    /*
     * If the device is offline, don't try and read capacity or any
     * of the other niceties.
     */
    if (!scsi_device_online(sdp))
        goto out;

    buffer = kmalloc(SD_BUF_SIZE, GFP_KERNEL);
    if (!buffer) {
        sd_printk(KERN_WARNING, sdkp, "sd_revalidate_disk: Memory "
              "allocation failure.\n");
        goto out;
    }

    sd_spinup_disk(sdkp);

    /*
     * Without media there is no reason to ask; moreover, some devices
     * react badly if we do.
     */
    if (sdkp->media_present) {
        sd_read_capacity(sdkp, buffer);

        if (sd_try_extended_inquiry(sdp)) {
            sd_read_block_limits(sdkp);
            sd_read_block_characteristics(sdkp);
        }

        sd_read_write_protect_flag(sdkp, buffer);
        sd_read_cache_type(sdkp, buffer);
        sd_read_app_tag_own(sdkp, buffer);
    }

    sdkp->first_scan = 0;

    /*
     * We now have all cache related info, determine how we deal
     * with ordered requests.  Note that as the current SCSI
     * dispatch function can alter request order, we cannot use
     * QUEUE_ORDERED_TAG_* even when ordered tag is supported.
     */
    if (sdkp->WCE)
        ordered = sdkp->DPOFUA
            ? QUEUE_ORDERED_DRAIN_FUA : QUEUE_ORDERED_DRAIN_FLUSH;
    else
        ordered = QUEUE_ORDERED_DRAIN;

    blk_queue_ordered(sdkp->disk->queue, ordered, sd_prepare_flush);

    set_capacity(disk, sdkp->capacity);
    kfree(buffer);

 out:
    return 0;
}
//Patch by QNAP: usb and sata device mapping
#ifdef CONFIG_MACH_QNAPTS
#define SATA_TYPE_6145 1
#define SATA_TYPE_7042 2
//Patch by QNAP: Port Multiplier
static int bus_map_index(int adapter_type,unsigned short host_no,int channel,int id,int lun);
int disk_slot_is_occupy(unsigned short host_no,int channel,int id,int lun);
int QNAP_disk_index(struct scsi_device *sdp);

/**
 * bus_map_index - called by disk_slot_is_occupy() and QNAP_disk_index()
 * adapter_type only use for TS509
 * Return disk_index if found or 0xff if fail.
 **/
static int bus_map_index(int adapter_type,unsigned short host_no,int channel,int id,int lun)
{
    int index = 0xff;
    if(channel < 0 || channel > MAX_ESATA_DISKS_BY_BUS)
        channel = 0;

//  printk(" host_no=%d, channel=%d, id=%d, lun=%d\n", host_no, channel, id, lun); // roylin test
#if defined(TS509)
    if(host_no == 0 && id == 0)
        index = 23;
    else if(adapter_type == SATA_TYPE_6145){
        if(host_no >= 2 && host_no <=3){
            switch(id){
            case 0:
                index = 0;
                break;
            case 5:
                index = 1;
                break;
            case 10:
                index = 2;
                break;
            case 15:
                index = 3;
                break;
            default:
                printk("Unexpect id!!! Please check it.\n");
                goto return_out;
            }
            index += (host_no-2)*4;
            if(host_no == 3 && id == 15)
                index = ESATA_BUS2_START_INDEX + channel; //sdza
        }
    }
    else if(adapter_type == SATA_TYPE_7042){
        switch(host_no){
        case 2://sdd
            index = 3;
            break;
        case 3://sdc
            index = 2;
            break;
        case 4://sdb
            index = 1;
            break;
        case 5://sda
            index = 0;
            break;
        case 6://sdz
            index = ESATA_BUS2_START_INDEX + channel; // sdza
            break;
        case 9://sde
            index = 4;
            break;
        default:
            printk("Unexpect id!!! Please check it.\n");
            goto return_out;
        }
    }
#elif defined(TS609)
    if(host_no == 0 && id == 0)
        index = 23;
    else{
        switch(host_no){
            case 2:
            case 3:
            case 4:
            case 5:
            case 6:
            case 7:
                index = host_no-2;
                break;
            case 8:
                index = ESATA_BUS2_START_INDEX + channel; // sdza
                break;
            default:
                printk("Unexpect id!!! Please check it.\n");
                goto return_out;
        }
    }
#elif defined(TS809) || defined (TS809U)
    if(host_no == 0 && id == 0)
        index = 23;
    else{
        switch(host_no){
        case 2://sdd
            index = 3;
            break;
        case 3://sdc
            index = 2;
            break;
        case 4://sdb
            index = 1;
            break;
        case 5://sda
            index = 0;
            break;
        case 6://sdh
            index = 7;
            break;
        case 7://sdg
            index = 6;
            break;
        case 8://sdf
            index = 5;
            break;
        case 9://sde
            index = 4;
            break;
        default:
            printk("Unexpect id!!! Please check it.\n");
            goto return_out;
        }
    }
//Patch by QNAP: Port Multiplier
#elif defined(TS259)
    //Patch by QNAP: add x59 derivative model
    if(is_x59_proII_model()){
        if(host_no == 4 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
            index = ESATA_BUS1_START_INDEX + channel;
        else if(host_no == 5 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
            index = ESATA_BUS2_START_INDEX + channel;
        else if(host_no>=6 && host_no<=7)
            index = host_no - 6;
    }
    else{
    if(host_no == 4 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
        index = ESATA_BUS1_START_INDEX + channel;
        else if(host_no == 5 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
        index = ESATA_BUS2_START_INDEX + channel;
    else if(host_no>=2 && host_no<=3)
        index = 3 - host_no;
    }
#elif defined(TS459)
    //Patch by QNAP: add x59 derivative model
    if(is_x59_proII_model()){
        if(host_no == 4 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
            index = ESATA_BUS1_START_INDEX + channel;
        else if(host_no == 5 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
            index = ESATA_BUS2_START_INDEX + channel;
        else if(host_no>=6 && host_no<=9)
            index = host_no - 6;
    }
    else{
        if(host_no == 6 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
            index = ESATA_BUS1_START_INDEX + channel;
        else if(host_no == 7 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
            index = ESATA_BUS2_START_INDEX + channel;
        else if(host_no>=2 && host_no<=5)
            index = 5 - host_no;
    }
    /////////////////////////////////////
#elif defined(TS459U)
    //Patch by QNAP: add x59 derivative model
    if(is_x59_proII_model()){
        if(host_no == 4 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
            index = ESATA_BUS1_START_INDEX + channel;
        else if(host_no == 5 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
            index = ESATA_BUS2_START_INDEX + channel;
        else if(host_no>=6 && host_no<=9)
            index = host_no - 6;
    }
    else{
        if(host_no == 6 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
            index = ESATA_BUS1_START_INDEX + channel;
        else if(host_no == 7 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
            index = ESATA_BUS2_START_INDEX + channel;
        else if(host_no>=2 && host_no<=5)
            index = host_no - 2;
    }
#elif defined(TS559)
    //Patch by QNAP: add x59 derivative model
    if(is_x59_proII_model() ){
        if(host_no == 4 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
            index = ESATA_BUS1_START_INDEX + channel;
        else if(host_no == 5 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
            index = ESATA_BUS2_START_INDEX + channel;
        else if(host_no>=6 && host_no<=10)
            index = host_no - 6;
    }
    else{
        if(host_no == 6 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
            index = ESATA_BUS1_START_INDEX + channel;
        else if(host_no == 7 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
            index = ESATA_BUS2_START_INDEX + channel;
        else if(host_no>=0 && host_no<=5)
            index = 5 - host_no;
    }
    ///////////////////////////////////////////
#elif defined(TS659)
    //Patch by QNAP: add x59 derivative model
    if(is_x59_proII_model()){
        if(host_no == 4 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
            index = ESATA_BUS1_START_INDEX + channel;
        else if(host_no == 5 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
            index = ESATA_BUS2_START_INDEX + channel;
        else if(host_no>=6 && host_no<=11)
            index = host_no - 6;
    }
    else{
        if(host_no == 6 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
            index = ESATA_BUS1_START_INDEX + channel;
        else if(host_no == 7 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
            index = ESATA_BUS2_START_INDEX + channel;
        else if(host_no>=0 && host_no<=5)
            index = 5 - host_no;
    }
    ///////////////////////////////////////////
#elif defined (TS859)
    if(host_no == 6 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
        index = ESATA_BUS1_START_INDEX + channel;
    else if(host_no == 7 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
        index = ESATA_BUS2_START_INDEX + channel;
    else if(host_no>=2 && host_no<=5)
        index = 5 - host_no;
    else if(host_no>=8 && host_no<=11)
        index = host_no-4;
#elif defined (TS859U)
    if(host_no == 6 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
        index = ESATA_BUS1_START_INDEX + channel;
    else if(host_no == 7 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
        index = ESATA_BUS2_START_INDEX + channel;
    else if(host_no>=2 && host_no<=5)
        index = host_no + 2;
    else if(host_no>=8 && host_no<=11)
        index = 3 - (host_no-8);
#elif defined(TS239)
    if(host_no == 4 && id == 0)
        index = 23;
#if 0
    else if(host_no >= 8 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1 // roylin test
        index = ESATA_BUS1_START_INDEX + channel + id;
#else
    else if(host_no == 8 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
        index = ESATA_BUS1_START_INDEX + channel + id;
    else if(host_no == 9 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
        index = ESATA_BUS2_START_INDEX + channel + id;
#endif
    else if(host_no == 6 && id == 0)
        index = 0; //sda
    else if(host_no == 7 && id == 0)
        index = 1; //sdb
    else
        printk("Unexpect id!!! Please check it.\n");
#elif defined(TS439) || defined(TS639) || defined (TS439U)
    if(host_no == 4 && id == 0)
        index = 23;
    else if(host_no == 0 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
        index = ESATA_BUS1_START_INDEX + channel;
    else if(host_no == 2 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
        index = ESATA_BUS2_START_INDEX + channel;
    else if(host_no >= 6 && host_no <= 11)
        index = host_no - 6;
#elif defined(SS439)
    if(host_no == 4 && id == 0)
        index = 23;
    else if(host_no == 0 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
        index = ESATA_BUS1_START_INDEX + channel;
    else if(host_no == 2 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
        index = ESATA_BUS2_START_INDEX + channel;
    else if(host_no >= 6 && host_no <= 9)
        index = 3 - (host_no - 6);
#elif defined(TS839)
    if(host_no == 4 && id == 0)
        index = 23;
    else if(host_no == 0 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
        index = ESATA_BUS1_START_INDEX + channel;
    else if(host_no == 2 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
        index = ESATA_BUS2_START_INDEX + channel;
    else{
        switch(host_no){
            case 13:
                index = 0;
                break;
            case 12:
                index = 1;
                break;
            case 11:
                index = 2;
                break;
            case 10:
                index = 3;
                break;
            case 6:
                index = 4;
                break;
            case 7:
                index = 5;
                break;
            case 8:
                index = 6;
                break;
            case 9:
                index = 7;
                break;
        }
    }
#elif defined(SS839)
    if(host_no == 4 && id == 0)
        index = 23;
    else if(host_no == 0 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
        index = ESATA_BUS1_START_INDEX + channel;
    else if(host_no == 2 && channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
        index = ESATA_BUS2_START_INDEX + channel;
    else{
        switch(host_no){
            case 10:
                index = 0;
                break;
            case 11:
                index = 1;
                break;
            case 12:
                index = 2;
                break;
            case 13:
                index = 3;
                break;
            case 9:
                index = 4;
                break;
            case 8:
                index = 5;
                break;
            case 7:
                index = 6;
                break;
            case 6:
                index = 7;
                break;
        }
    }
#elif defined(TS879) || defined(TS1079)
    switch(host_no){
        case 10:
            index = 0;
            break;
        case 11:
            index = 1;
            break;
        case 8:
            index = 2;
            break;
        case 9:
            index = 3;
            break;
        case 6:
            index = 4;
            break;
        case 7:
            index = 5;
            break;
        case 1:
            index = 6;
            break;
        case 0:
            index = 7;
            break;
        case 12:
            index = 8;
            break;
        case 13:
            index = 9;
            break;
        case 4:
            if(channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
                index = ESATA_BUS1_START_INDEX + channel;
            break;
        case 5:
            if(channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
                index = ESATA_BUS2_START_INDEX + channel;
            break;
    }
#elif defined(TS879U)
    switch(host_no){
        case 6:
            index = 0;
            break;
        case 7:
            index = 1;
            break;
        case 1:
            index = 2;
            break;
        case 0:
            index = 3;
            break;
        case 8:
            index = 4;
            break;
        case 9:
            index = 5;
            break;
        case 10:
            index = 6;
            break;
        case 11:
            index = 7;
            break;
        case 4:
            if(channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
                index = ESATA_BUS1_START_INDEX + channel;
            break;
        case 5:
            if(channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
                index = ESATA_BUS2_START_INDEX + channel;
            break;
    }
#elif defined(TS1259U)
    switch(host_no){
        case 3:
            index = 0;
            break;
        case 2:
            index = 1;
            break;
        case 1:
            index = 2;
            break;
        case 0:
            index = 3;
            break;
        case 6:
            index = 4;
            break;
        case 9:
            index = 5;
            break;
        case 10:
            index = 6;
            break;
        case 13:
            index = 7;
            break;
        case 7:
            index = 8;
            break;
        case 8:
            index = 9;
            break;
        case 11:
            index = 10;
            break;
        case 12:
            index = 11;
            break;
        case 4:
            if(channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
                index = ESATA_BUS1_START_INDEX + channel;
            break;
        case 5:
            if(channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
                index = ESATA_BUS2_START_INDEX + channel;
            break;
    }
#elif defined(TS1279U)
    switch(host_no){
        case 6:
            index = 0;
            break;
        case 7:
            index = 1;
            break;
        case 1:
            index = 2;
            break;
        case 0:
            index = 3;
            break;
        case 10:
            index = 4;
            break;
        case 11:
            index = 5;
            break;
        case 12:
            index = 6;
            break;
        case 13:
            index = 7;
            break;
        case 8:
            index = 8;
            break;
        case 9:
            index = 9;
            break;
        case 14:
            index = 10;
            break;
        case 15:
            index = 11;
            break;
        case 4:
            if(channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-1
                index = ESATA_BUS1_START_INDEX + channel;
            break;
        case 5:
            if(channel < MAX_ESATA_DISKS_BY_BUS)//ESATA-2
                index = ESATA_BUS2_START_INDEX + channel;
            break;
    }
#endif
return_out:
    return index;
}

/**
 * disk_slot_is_occupy - called by sata driver to detect slot is free or not
 * Return 1 if occupy or 0 if empty
 **/
int disk_slot_is_occupy(unsigned short host_no,int channel,int id,int lun)
{
    int index = bus_map_index(0,host_no,channel,id,lun);
    int occupy = 0;
    if(Is_ESATA_Bus1_Index(index)){ //sdya ~
        occupy = esata_bus1_dev_arr[index - ESATA_BUS1_START_INDEX];
    }
    else if(Is_ESATA_Bus2_Index(index)){ //sdza ~
        occupy = esata_bus2_dev_arr[index - ESATA_BUS2_START_INDEX];
    }
    else if(index == 0xff){
        for(index=0;index < 8;index++){
            if(!sd_dev_arr[index])
                break;
        }
        if(index == 8)
            occupy = 1;
        else
            occupy = 0;
    }
    else
        occupy = sd_dev_arr[index];
    return occupy;
}
EXPORT_SYMBOL(disk_slot_is_occupy);
#ifdef NAS_VIRTUAL_EX
static int QNAP_get_iscsi_free_slot(const char *iqn)
{
    int i;
    if (!iqn || !*iqn)
        return -1;
    for (i = 0; i < MAX_ISCSI_DISK; i ++) {
        if (iscsi_dev_arr[i] == 0) {
            return i;
        }
    }
    return -1;
}
#endif
/**
 * QNAP_disk_index - called by sd_probe in sd.c and sg_alloc in sg.c
 * Return disk_index if found or 0xff
 **/
int QNAP_disk_index(struct scsi_device *sdp)
{
    unsigned short host_no = sdp->host->host_no;
    unsigned int channel = sdp->channel;
    unsigned int id = sdp->id;
    unsigned int lun = sdp->lun;
    int adapter_type = 0;
#if defined(TS509)
    struct scsi_host_template *hostt = sdp->host->hostt;
#endif
#ifdef NAS_VIRTUAL
    int index = 0xff;
    struct scsi_host_template *iscsi_hostt = sdp->host->hostt;
    printk("Check proc_name[%s].\n", iscsi_hostt->proc_name);
    if (!strcmp(iscsi_hostt->proc_name, "iscsi_tcp")) {
#ifdef NAS_VIRTUAL_EX
        int idx;
        if ((idx = QNAP_get_iscsi_free_slot(qnap_iqn_node)) >= 0) {
            index = Get_iSCSI_Index('w', ('a'+idx));    //sdwX
            printk("qnap_iqn_node=%s.\n", qnap_iqn_node);
        }
        else {
#endif
            if (strlen(qnap_disk_node) >= 4 && strncmp(qnap_disk_node, "sd", 2) == 0)
                index = Get_iSCSI_Index(qnap_disk_node[2], qnap_disk_node[3]);
#ifdef NAS_VIRTUAL_EX
        }
#endif
        if (!Is_iSCSI_Index(index)) {
            return -1;
        }
        printk("Get sd index %d.\n", index);
        return index;
    }
#endif
#if defined(TS509)
    if(!strcmp(hostt->proc_name,"mvSata")){
        //MV7042
        adapter_type = SATA_TYPE_7042;
    }
    else if(!strcmp(hostt->proc_name,"mv61xx")){
        //MV6145
        adapter_type = SATA_TYPE_6145;
    }
    printk("TS509 SATA TYPE is %d\n",adapter_type);
#endif
    return bus_map_index(adapter_type,host_no,channel,id,lun);
}

#endif
///////////////////////////////////////

/**
 *  sd_format_disk_name - format disk name
 *  @prefix: name prefix - ie. "sd" for SCSI disks
 *  @index: index of the disk to format name for
 *  @buf: output buffer
 *  @buflen: length of the output buffer
 *
 *  SCSI disk names starts at sda.  The 26th device is sdz and the
 *  27th is sdaa.  The last one for two lettered suffix is sdzz
 *  which is followed by sdaaa.
 *
 *  This is basically 26 base counting with one extra 'nil' entry
 *  at the beggining from the second digit on and can be
 *  determined using similar method as 26 base conversion with the
 *  index shifted -1 after each digit is computed.
 *
 *  CONTEXT:
 *  Don't care.
 *
 *  RETURNS:
 *  0 on success, -errno on failure.
 */
static int sd_format_disk_name(char *prefix, int index, char *buf, int buflen)
{
    const int base = 'z' - 'a' + 1;
    char *begin = buf + strlen(prefix);
    char *end = buf + buflen;
    char *p;
    int unit;

    p = end - 1;
    *p = '\0';
    unit = base;
    do {
        if (p == begin)
            return -EINVAL;
        *--p = 'a' + (index % unit);
        index = (index / unit) - 1;
    } while (index >= 0);

    memmove(begin, p, end - p);
    memcpy(buf, prefix, strlen(prefix));

    return 0;
}
#ifdef CONFIG_MACH_QNAPTS
//Patch by QNAP: USB port
static void qnap_set_usb_hub_table(int mainport, int hub_port,int havehub,int speed)
{
    if(havehub){
        int usb_hub_port;
        usb_hub_port = 1<<(4+hub_port);
        usbdev_exist[mainport] |= usb_hub_port;
        usbdev_status_changed[mainport] |= usb_hub_port;
        if(speed==USB_HIGH_SPEED)
            usbdev_speedtype[mainport] |= usb_hub_port;
    }
    else{
        usbdev_exist[mainport]=USB_PORT;
        usbdev_status_changed[mainport]=USB_PORT;
        if(speed==USB_HIGH_SPEED)
            usbdev_speedtype[mainport] |= USB_PORT;
    }
}
////////////////////////////////////////////////
#endif
/*
 * The asynchronous part of sd_probe
 */
static void sd_probe_async(void *data, async_cookie_t cookie)
{
    struct scsi_disk *sdkp = data;
    struct scsi_device *sdp;
    struct gendisk *gd;
    u32 index;
    struct device *dev;
//Patch by QNAP: usb and sata device mapping
#ifdef CONFIG_MACH_QNAPTS
    int usb_port=0, havehub=0;
    int hub_port=0, speed=0, mainport=0;
#endif
    sdp = sdkp->device;
//Patch by QNAP: usb and sata device mapping
#ifdef CONFIG_MACH_QNAPTS
    usb_port = usb_get_port(sdp->host->shost_gendev.parent);
    havehub = usb_have_hub(sdp->host->shost_gendev.parent);
    speed = usb_get_speed(sdp->host->shost_gendev.parent);
#endif
////////////////////////////////////////////////////////
    gd = sdkp->disk;
    index = sdkp->index;
    dev = &sdp->sdev_gendev;

    if (index < SD_MAX_DISKS) {
        gd->major = sd_major((index & 0xf0) >> 4);
        gd->first_minor = ((index & 0xf) << 4) | (index & 0xfff00);
        gd->minors = SD_MINORS;
    }
    gd->fops = &sd_fops;
    gd->private_data = &sdkp->driver;
    gd->queue = sdkp->device->request_queue;

    /* defaults, until the device tells us otherwise */
    sdp->sector_size = 512;
    sdkp->capacity = 0;
    sdkp->media_present = 1;
    sdkp->write_prot = 0;
    sdkp->WCE = 0;
    sdkp->RCD = 0;
    sdkp->ATO = 0;
    sdkp->first_scan = 1;

    sd_revalidate_disk(gd);

    blk_queue_prep_rq(sdp->request_queue, sd_prep_fn);

    gd->driverfs_dev = &sdp->sdev_gendev;
    gd->flags = GENHD_FL_EXT_DEVT | GENHD_FL_DRIVERFS;
    if (sdp->removable)
        gd->flags |= GENHD_FL_REMOVABLE;

    dev_set_drvdata(dev, sdkp);
    add_disk(gd);
    sd_dif_config_host(sdkp);

    sd_revalidate_disk(gd);

    sd_printk(KERN_NOTICE, sdkp, "Attached SCSI %sdisk\n",
          sdp->removable ? "removable " : "");

    put_device(&sdkp->dev);
//Patch by QNAP: usb and sata device mapping
//add by avery
//printk("sd_probe_async :speed = %d\n",speed);
//printk("sd_probe_async :major = %d\n",gd->major);
//printk("sd_probe_async :first_minor = %d\n",gd->first_minor);
//////////////////
#ifdef CONFIG_MACH_QNAPTS
    switch(index){
#if defined(X86_SANDYBRIDGE) || defined(TS1259U)
        case 0 ... 15:
            send_message_to_app(QNAP_IOCTL_SATA_UP + index);
            break;
#else
        case 0:
            send_message_to_app(QNAP_SATA_UP);
            break;
        case 1:
            send_message_to_app(QNAP_SATA2_UP);
            break;
        case 2:
            send_message_to_app(QNAP_SATA3_UP);
            break;
        case 3:
            send_message_to_app(QNAP_SATA4_UP);
            break;
        case 4:
            send_message_to_app(QNAP_SATA5_UP);
            break;
        case 5:
            send_message_to_app(QNAP_SATA6);
            break;
        case 6:
            send_message_to_app(QNAP_SATA7);
            break;
        case 7:
            send_message_to_app(QNAP_SATA8_UP);
            break;
        case 8:
        case 9:
        case 10:
        case 11:
        case 12:
        case 13:
        case 14:
        case 15:
            mainport=PORT1;
            if(havehub){
                hub_port = usb_port-USB_FRONT_PORT;
                if(hub_port==0){
                    usbdev_exist[mainport] |= USB_HUB_PORT1;
                    usbdev_status_changed[mainport] |= USB_HUB_PORT1;
                    if(speed==USB_HIGH_SPEED)
                        usbdev_speedtype[mainport] |= USB_HUB_PORT1;
                }
                else if(hub_port==1){
                    usbdev_exist[mainport]|=USB_HUB_PORT2;
                    usbdev_status_changed[mainport] |= USB_HUB_PORT2;
                    if(speed==USB_HIGH_SPEED)
                        usbdev_speedtype[mainport] |= USB_HUB_PORT2;
                }
                else if(hub_port==2){
                    usbdev_exist[mainport]|=USB_HUB_PORT3;
                    usbdev_status_changed[mainport] |= USB_HUB_PORT3;
                    if(speed==USB_HIGH_SPEED)
                        usbdev_speedtype[mainport] |= USB_HUB_PORT3;
                }
                else if(hub_port==3){
                    usbdev_exist[mainport]|=USB_HUB_PORT4;
                    usbdev_status_changed[mainport] |= USB_HUB_PORT4;
                    if(speed==USB_HIGH_SPEED)
                        usbdev_speedtype[mainport] |= USB_HUB_PORT4;
                }
                else if(hub_port==4){
                    usbdev_exist[mainport]|=USB_HUB_PORT5;
                    usbdev_status_changed[mainport] |= USB_HUB_PORT5;
                    if(speed==USB_HIGH_SPEED)
                        usbdev_speedtype[mainport] |= USB_HUB_PORT5;
                }
                else if(hub_port==5){
                    usbdev_exist[mainport]|=USB_HUB_PORT6;
                    usbdev_status_changed[mainport] |= USB_HUB_PORT6;
                    if(speed==USB_HIGH_SPEED)
                        usbdev_speedtype[mainport] |= USB_HUB_PORT6;
                }
                else if(hub_port==6){
                    usbdev_exist[mainport]|=USB_HUB_PORT7;
                    usbdev_status_changed[mainport] |= USB_HUB_PORT7;
                    if(speed==USB_HIGH_SPEED)
                        usbdev_speedtype[mainport] |= USB_HUB_PORT7;
                }
                else if(hub_port==7){
                    usbdev_exist[mainport]|=USB_HUB_PORT8;
                    usbdev_status_changed[mainport] |= USB_HUB_PORT8;
                    if(speed==USB_HIGH_SPEED)
                        usbdev_speedtype[mainport] |= USB_HUB_PORT8;
                }
                else{
                    printk("Send TS over limited\n");
                }
            }
            else{
                usbdev_exist[mainport]=USB_PORT;
                usbdev_status_changed[mainport]=USB_PORT;
                if(speed==USB_HIGH_SPEED)
                    usbdev_speedtype[mainport] |= USB_PORT;
            }
            send_message_to_app(QNAP_USB_FRONT_UP);
            break;
#endif
//Patch by QNAP: add x59 derivative model
        case 16:
            mainport=PORT6;
            usbdev_exist[mainport]=USB_PORT;
            usbdev_status_changed[mainport]=USB_PORT;
            if(speed==USB_HIGH_SPEED)
                usbdev_speedtype[mainport] |= USB_PORT;
            send_message_to_app(QNAP_USB_BACK5_UP);
            break;
        case 17:
            mainport=PORT7;
            usbdev_exist[mainport]=USB_PORT;
            usbdev_status_changed[mainport]=USB_PORT;
            if(speed==USB_HIGH_SPEED)
                usbdev_speedtype[mainport] |= USB_PORT;
            send_message_to_app(QNAP_USB_BACK6_UP);
            break;
/////////////////////////////////////
        case 18:
                        //Patch by QNAP: USB Port Multiplier
            mainport=PORT2;
            usbdev_exist[mainport]=USB_PORT;
            usbdev_status_changed[mainport]=USB_PORT;
            if(speed==USB_HIGH_SPEED)
                usbdev_speedtype[mainport] |= USB_PORT;
            send_message_to_app(QNAP_USB_BACK1_UP);
            break;
        case 19:
                        //Patch by QNAP: USB Port Multiplier
            mainport=PORT3;
            usbdev_exist[mainport]=USB_PORT;
            usbdev_status_changed[mainport]=USB_PORT;
            if(speed==USB_HIGH_SPEED)
                usbdev_speedtype[mainport] |= USB_PORT;
            send_message_to_app(QNAP_USB_BACK2_UP);
            break;
        case 20:
                        //Patch by QNAP: USB Port Multiplier
            mainport=PORT4;
            usbdev_exist[mainport]=USB_PORT;
            usbdev_status_changed[mainport]=USB_PORT;
            if(speed==USB_HIGH_SPEED)
                usbdev_speedtype[mainport] |= USB_PORT;
            send_message_to_app(QNAP_USB_BACK3_UP);
            break;
        case 21:
                        //Patch by QNAP: USB Port Multiplier
            mainport=PORT5;
            usbdev_exist[mainport]=USB_PORT;
            usbdev_status_changed[mainport]=USB_PORT;
            if(speed==USB_HIGH_SPEED)
                usbdev_speedtype[mainport] |= USB_PORT;
            send_message_to_app(QNAP_USB_BACK4_UP);
            break;
        case 23:
            //For X86_PINEVIEW
            break;
        case 24:
            send_message_to_app(QNAP_ESATA_UP);
            break;
        case 25:
            send_message_to_app(QNAP_ESATA2_UP);
            break;
        default:
#ifdef NAS_VIRTUAL
            if (Is_iSCSI_Index(index)) {
                send_message_to_app(QNAP_ISCSI_UP);
                break;
            }
            else
#endif
//Patch by QNAP: Port Multiplier
            if (Is_USB_Front_Port_Index(index)){
                hub_port = index -USB_FRONT_PORT_START_INDEX;
                qnap_set_usb_hub_table(PORT1,hub_port,havehub,speed);
                //do not sent message in hub case
                //send_message_to_app(QNAP_USB_FRONT_UP);
            }else if (Is_USB_Back_Port1_Index(index)){
                hub_port = index -USB_BACK_PORT_1_START_INDEX;
                qnap_set_usb_hub_table(PORT2,hub_port,havehub,speed);
                //do not sent message in hub case
                //send_message_to_app(QNAP_USB_BACK1_UP);
                break;
            }else if (Is_USB_Back_Port2_Index(index)){
                hub_port = index -USB_BACK_PORT_2_START_INDEX;
                qnap_set_usb_hub_table(PORT3,hub_port,havehub,speed);
                //do not sent message in hub case
                //send_message_to_app(QNAP_USB_BACK2_UP);
                break;
            }else if (Is_USB_Back_Port3_Index(index)){
                hub_port = index -USB_BACK_PORT_3_START_INDEX;
                qnap_set_usb_hub_table(PORT4,hub_port,havehub,speed);
                //do not sent message in hub case
                //send_message_to_app(QNAP_USB_BACK3_UP);
                break;
            }else if (Is_USB_Back_Port4_Index(index)){
                hub_port = index -USB_BACK_PORT_4_START_INDEX;
                qnap_set_usb_hub_table(PORT5,hub_port,havehub,speed);
                //do not sent message in hub case
                //send_message_to_app(QNAP_USB_BACK4_UP);
                break;
            }else if (Is_USB_Back_Port5_Index(index)){
                hub_port = index -USB_BACK_PORT_5_START_INDEX;
                qnap_set_usb_hub_table(PORT6,hub_port,havehub,speed);
                //do not sent message in hub case
                //send_message_to_app(QNAP_USB_BACK5_UP);
                break;
            }else if (Is_USB_Back_Port6_Index(index)){
                hub_port = index -USB_BACK_PORT_6_START_INDEX;
                qnap_set_usb_hub_table(PORT7,hub_port,havehub,speed);
                //do not sent message in hub case
                //send_message_to_app(QNAP_USB_BACK6_UP);
                break;
            }else
/////////////////
//Patch by QNAP: Port Multiplier
            if(Is_ESATA_Bus1_Index(index)){ //sdya ~
                send_message_to_app(QNAP_IOCTL_ESATA_UP + (index - ESATA_BUS1_START_INDEX));
                break;
            }
            else if(Is_ESATA_Bus2_Index(index)){ //sdza ~
                send_message_to_app(QNAP_IOCTL_ESATA_UP + 0x10 + (index - ESATA_BUS2_START_INDEX));
                break;
            }
            else
/////////////////
                printk("sd: Unknown port.\n");
            break;
    }

#endif
    return;

}

/**
 *  sd_probe - called during driver initialization and whenever a
 *  new scsi device is attached to the system. It is called once
 *  for each scsi device (not just disks) present.
 *  @dev: pointer to device object
 *
 *  Returns 0 if successful (or not interested in this scsi device
 *  (e.g. scanner)); 1 when there is an error.
 *
 *  Note: this function is invoked from the scsi mid-level.
 *  This function sets up the mapping between a given
 *  <host,channel,id,lun> (found in sdp) and new device name
 *  (e.g. /dev/sda). More precisely it is the block device major
 *  and minor number that is chosen here.
 *
 *  Assume sd_attach is not re-entrant (for time being)
 *  Also think about sd_attach() and sd_remove() running coincidentally.
 **/
static int sd_probe(struct device *dev)
{
    struct scsi_device *sdp = to_scsi_device(dev);
    struct scsi_disk *sdkp;
    struct gendisk *gd;
    u32 index;
    int error;
//Patch by QNAP: usb and sata device mapping
#ifdef CONFIG_MACH_QNAPTS
    int usb_port=0;
    usb_port = usb_get_port(sdp->host->shost_gendev.parent);
#endif
/////////////////////////////////////////////////
    error = -ENODEV;
    if (sdp->type != TYPE_DISK && sdp->type != TYPE_MOD && sdp->type != TYPE_RBC)
        goto out;

    SCSI_LOG_HLQUEUE(3, sdev_printk(KERN_INFO, sdp,
                    "sd_attach\n"));

    error = -ENOMEM;
    sdkp = kzalloc(sizeof(*sdkp), GFP_KERNEL);
    if (!sdkp)
        goto out;

    gd = alloc_disk(SD_MINORS);
    if (!gd)
        goto out_free;
//Patch by QNAP: usb and sata device mapping
#ifdef CONFIG_MACH_QNAPTS
    spin_lock(&sd_index_lock);
    if(usb_port > 0){
        index = usb_port;
        if(index >= USB_FRONT_PORT){
            for(;index<26;index++){
                if(!sd_dev_arr[index]){ // Need to skip E-SATA
                    break;
                }
            }
            if(usb_port >= 8 && usb_port <=17){
                if(index > 17){ //Out of usb range of front port.
                    index = 0xff;
                    //printk("Over limitation! ==================================================== index = [%d], usb_port = [%d]\n", index, usb_port);
                    send_message_to_app(QNAP_USB_OVER_LIMIT);
                }
            }
        }
        else
            index = 0xff;
    }
    else{   /* Sata HD here, Marvell driver will fix host number. */
        index = QNAP_disk_index(sdp);
    }
#ifdef NAS_VIRTUAL
#ifdef NAS_VIRTUAL_EX
    if (index == -1) {
        error = -ENODEV;
    }
    else
//  if (index >= ISCSI_DEV_START_INDEX) { //sdwa ~ sdwz
    if (Is_iSCSI_Index(index)) { //sdwa ~ sdwz
            int ip = index - ISCSI_DEV_START_INDEX;
            error = -EBUSY;
            printk("index of iscsi_dev_arr is %d\n", ip);
            if (!iscsi_dev_arr[ip]) {
                    iscsi_dev_arr[ip] = 1;
                    if (iscsi_iqn_arr[ip])
                        kfree(iscsi_iqn_arr[ip]);
                    iscsi_iqn_arr[ip] = kstrdup(qnap_iqn_node, GFP_KERNEL);
                    if (iscsi_sn_vpd_arr[ip])
                        kfree(iscsi_sn_vpd_arr[ip]);
                    iscsi_sn_vpd_arr[ip] = scsi_get_vpd_page(sdp, 0x80);
                    int vpd_len = iscsi_sn_vpd_arr[ip][3]+4;
                    iscsi_sn_vpd_arr[ip][vpd_len] = '\0';
//                  iscsi_dev_ptr[ip] = dev;
                    error = 0;
            }
    }
    else
#else
    if ((index >= ISCSI_DEV_START_INDEX) && (index < (ISCSI_DEV_START_INDEX+26))) { //sdwa ~ sdwz
        int ip = index - ISCSI_DEV_START_INDEX;
        error = -EBUSY;
        if (!iscsi_dev_arr[ip]) {
            iscsi_dev_arr[ip] = 1;
            error = 0;
        }
    }
    else
#endif
#endif
//Patch by QNAP: USB Port Multiplier
    if(Is_USB_Front_Port_Index(index)){ //sdia ~
        printk("usb_front_port_dev_arr[%d] = %d \n",index - USB_FRONT_PORT_START_INDEX,usb_front_port_dev_arr[index - USB_FRONT_PORT_START_INDEX]);
        if(usb_front_port_dev_arr[index - USB_FRONT_PORT_START_INDEX]){
            error = -EBUSY;
        }
        else{
            usb_front_port_dev_arr[index - USB_FRONT_PORT_START_INDEX] = 1;
            error = 0;
        }
    }
    else if(Is_USB_Back_Port1_Index(index)){ //sdsa ~
        printk("usb_back_port1_dev_arr[%d] = %d \n",index - USB_BACK_PORT_1_START_INDEX,usb_back_port1_dev_arr[index - USB_BACK_PORT_1_START_INDEX]);
        if(usb_back_port1_dev_arr[index - USB_BACK_PORT_1_START_INDEX]){
            error = -EBUSY;
        }
        else{
            usb_back_port1_dev_arr[index - USB_BACK_PORT_1_START_INDEX] = 1;
            error = 0;
        }
    }
    else if(Is_USB_Back_Port2_Index(index)){ //sdta ~
        printk("usb_back_port2_dev_arr[%d] = %d \n",index - USB_BACK_PORT_2_START_INDEX,usb_back_port2_dev_arr[index - USB_BACK_PORT_2_START_INDEX]);
        if(usb_back_port2_dev_arr[index - USB_BACK_PORT_2_START_INDEX]){
            error = -EBUSY;
        }
        else{
            usb_back_port2_dev_arr[index - USB_BACK_PORT_2_START_INDEX] = 1;
            error = 0;
        }
    }
    else if(Is_USB_Back_Port3_Index(index)){ //sdua ~
        if(usb_back_port3_dev_arr[index - USB_BACK_PORT_3_START_INDEX]){
            error = -EBUSY;
        }
        else{
            usb_back_port3_dev_arr[index - USB_BACK_PORT_3_START_INDEX] = 1;
            error = 0;
        }
    }
    else if(Is_USB_Back_Port4_Index(index)){ //sdva ~
        if(usb_back_port4_dev_arr[index - USB_BACK_PORT_4_START_INDEX]){
            error = -EBUSY;
        }
        else{
            usb_back_port4_dev_arr[index - USB_BACK_PORT_4_START_INDEX] = 1;
            error = 0;
        }
    }
    else if(Is_USB_Back_Port5_Index(index)){ //sdqa ~
        if(usb_back_port5_dev_arr[index - USB_BACK_PORT_5_START_INDEX]){
            error = -EBUSY;
        }
        else{
            usb_back_port5_dev_arr[index - USB_BACK_PORT_5_START_INDEX] = 1;
            error = 0;
        }
    }
    else if(Is_USB_Back_Port6_Index(index)){ //sdra ~
        if(usb_back_port6_dev_arr[index - USB_BACK_PORT_6_START_INDEX]){
            error = -EBUSY;
        }
        else{
            usb_back_port6_dev_arr[index - USB_BACK_PORT_6_START_INDEX] = 1;
            error = 0;
        }
    }
    else
///////////////////////
        //Patch by QNAP: Port Multiplier
        if(Is_ESATA_Bus1_Index(index)){ //sdya ~
            if(esata_bus1_dev_arr[index - ESATA_BUS1_START_INDEX]){
                printk("SCSI sd slot %d is occupy,Please check it.\n",index);
                error = -EBUSY;
            }
            else{
                esata_bus1_dev_arr[index - ESATA_BUS1_START_INDEX] = 1;
                error = 0;
            }
        }
        else if(Is_ESATA_Bus2_Index(index)){ //sdza ~
            if(esata_bus2_dev_arr[index - ESATA_BUS2_START_INDEX]){
                printk("SCSI sd slot %d is occupy,Please check it.\n",index);
                error = -EBUSY;
            }
            else{
                esata_bus2_dev_arr[index - ESATA_BUS2_START_INDEX] = 1;
                error = 0;
            }
        }
        else{
            ///////////////
            if(index == 0xff){
                int i;
                for(i=0;i<8;i++){
                    if(!sd_dev_arr[i]){
                        index = i;
                        sd_dev_arr[index] = 1;
                        error = 0;
                        break;
                    }
                }
            }
            else if(sd_dev_arr[index]){
                printk("SCSI sd slot %d is occupy,Please check it.\n",index);
                error = -EBUSY;
            }
            else{
                sd_dev_arr[index] = 1;
                error = 0;
            }
        }

    spin_unlock(&sd_index_lock);
#else // ------------------------------------------------
    do {
        if (!ida_pre_get(&sd_index_ida, GFP_KERNEL))
            goto out_put;

        spin_lock(&sd_index_lock);
        error = ida_get_new(&sd_index_ida, &index);
        spin_unlock(&sd_index_lock);
    } while (error == -EAGAIN);

#endif // CONFIG_MACH_QNAPTS
    /////////////////////////////////////////////////////
    if (error)
        goto out_put;

    error = sd_format_disk_name("sd", index, gd->disk_name, DISK_NAME_LEN);
    if (error)
        goto out_free_index;

    sdkp->device = sdp;
    sdkp->driver = &sd_template;
    sdkp->disk = gd;
    sdkp->index = index;
    sdkp->openers = 0;
    sdkp->previous_state = 1;

    if (!sdp->request_queue->rq_timeout) {
        if (sdp->type != TYPE_MOD)
            blk_queue_rq_timeout(sdp->request_queue, SD_TIMEOUT);
        else
            blk_queue_rq_timeout(sdp->request_queue,
                    SD_MOD_TIMEOUT);
    }

    device_initialize(&sdkp->dev);
    sdkp->dev.parent = &sdp->sdev_gendev;
    sdkp->dev.class = &sd_disk_class;
    dev_set_name(&sdkp->dev, dev_name(&sdp->sdev_gendev));

    if (device_add(&sdkp->dev))
        goto out_free_index;

    get_device(&sdp->sdev_gendev);

    get_device(&sdkp->dev); /* prevent release before async_schedule */
    async_schedule(sd_probe_async, sdkp);

    return 0;

out_free_index:
    spin_lock(&sd_index_lock);
    //Patch by QNAP: usb and sata device mapping
#ifdef CONFIG_MACH_QNAPTS
//Patch by QNAP: USB Port Multiplier
    if(Is_USB_Front_Port_Index(index))  //sdia
        usb_front_port_dev_arr[index - USB_FRONT_PORT_START_INDEX] = 0;
    else if(Is_USB_Back_Port1_Index(index))//sdsa ~
        usb_back_port1_dev_arr[index - USB_BACK_PORT_1_START_INDEX] = 0;
    else if(Is_USB_Back_Port2_Index(index)) //sdta ~
        usb_back_port2_dev_arr[index - USB_BACK_PORT_2_START_INDEX] = 0;
    else if(Is_USB_Back_Port3_Index(index)) //sdua ~
        usb_back_port3_dev_arr[index - USB_BACK_PORT_3_START_INDEX] = 0;
    else if(Is_USB_Back_Port4_Index(index)) //sdva ~
        usb_back_port4_dev_arr[index - USB_BACK_PORT_4_START_INDEX] = 0;
    else if(Is_USB_Back_Port5_Index(index)) //sdqa ~a
        usb_back_port5_dev_arr[index - USB_BACK_PORT_5_START_INDEX] = 0;
    else if(Is_USB_Back_Port6_Index(index)) //sdra ~
        usb_back_port6_dev_arr[index - USB_BACK_PORT_6_START_INDEX] = 0;
    else
////////////////////////
    if(Is_ESATA_Bus1_Index(index)){ //sdya ~
        esata_bus1_dev_arr[index - ESATA_BUS1_START_INDEX] = 0;
    }
    else if(Is_ESATA_Bus2_Index(index)){ //sdza ~
        esata_bus2_dev_arr[index - ESATA_BUS2_START_INDEX] = 0;
    }
    else
        sd_dev_arr[index] = 0;
#else
    ida_remove(&sd_index_ida, index);
#endif
    ///////////////////////////////////////////
    spin_unlock(&sd_index_lock);
out_put:
    put_disk(gd);
out_free:
    kfree(sdkp);
out:
    return error;
}

/**
 *  sd_remove - called whenever a scsi disk (previously recognized by
 *  sd_probe) is detached from the system. It is called (potentially
 *  multiple times) during sd module unload.
 *  @sdp: pointer to mid level scsi device object
 *
 *  Note: this function is invoked from the scsi mid-level.
 *  This function potentially frees up a device name (e.g. /dev/sdc)
 *  that could be re-used by a subsequent sd_probe().
 *  This function is not called when the built-in sd driver is "exit-ed".
 **/
static int sd_remove(struct device *dev)
{
    struct scsi_disk *sdkp;

    async_synchronize_full();
    sdkp = dev_get_drvdata(dev);
    blk_queue_prep_rq(sdkp->device->request_queue, scsi_prep_fn);
    device_del(&sdkp->dev);
    del_gendisk(sdkp->disk);
    sd_shutdown(dev);

    mutex_lock(&sd_ref_mutex);
    dev_set_drvdata(dev, NULL);
    put_device(&sdkp->dev);
    mutex_unlock(&sd_ref_mutex);
//Patch by QNAP: usb and sata device mapping
#ifdef CONFIG_MACH_QNAPTS
    switch(sdkp->index){
#if defined(X86_SANDYBRIDGE) || defined(TS1259U)
        case 0 ... 15:
            send_message_to_app(QNAP_IOCTL_SATA_DOWN + sdkp->index);
            break;
#else
        case 0:
            send_message_to_app(QNAP_SATA_DOWN);
            break;
        case 1:
            send_message_to_app(QNAP_SATA2_DOWN);
            break;
        case 2:
            send_message_to_app(QNAP_SATA3_DOWN);
            break;
        case 3:
            send_message_to_app(QNAP_SATA4_DOWN);
            break;
        case 4:
            send_message_to_app(QNAP_SATA5_DOWN);
            break;
        case 5:
            send_message_to_app(QNAP_SATA6);
            break;
        case 6:
            send_message_to_app(QNAP_SATA7);
            break;
        case 7:
            send_message_to_app(QNAP_SATA8_DOWN);
            break;
#endif
        case 24:
            send_message_to_app(QNAP_ESATA_DOWN);
            break;
        case 25:
            send_message_to_app(QNAP_ESATA2_DOWN);
            break;
#ifdef NAS_VIRTUAL
        default:
            if (Is_iSCSI_Index(sdkp->index)) {
                send_message_to_app(QNAP_ISCSI_DOWN);
                break;
            }
            else
#endif
            if(Is_ESATA_Bus1_Index(sdkp->index)){ //sdya ~
                send_message_to_app(QNAP_IOCTL_ESATA_DOWN + (sdkp->index - ESATA_BUS1_START_INDEX));
                break;
            }
            else if(Is_ESATA_Bus2_Index(sdkp->index)){ //sdza ~
                send_message_to_app(QNAP_IOCTL_ESATA_DOWN + 0x10 + (sdkp->index - ESATA_BUS2_START_INDEX));
                break;
            }
    }
#endif
    return 0;
}

/**
 *  scsi_disk_release - Called to free the scsi_disk structure
 *  @dev: pointer to embedded class device
 *
 *  sd_ref_mutex must be held entering this routine.  Because it is
 *  called on last put, you should always use the scsi_disk_get()
 *  scsi_disk_put() helpers which manipulate the semaphore directly
 *  and never do a direct put_device.
 **/
static void scsi_disk_release(struct device *dev)
{
    struct scsi_disk *sdkp = to_scsi_disk(dev);
    struct gendisk *disk = sdkp->disk;
//Patch by QNAP: usb and sata device mapping
#ifdef CONFIG_MACH_QNAPTS
    int index = sdkp->index;
#endif
/////////////////////////////////////////
    spin_lock(&sd_index_lock);
//Patch by QNAP: usb and sata device mapping
#ifdef CONFIG_MACH_QNAPTS
#ifdef NAS_VIRTUAL
    if (Is_iSCSI_Index(index)) {
        index -= ISCSI_DEV_START_INDEX;
        iscsi_dev_arr[index]=0;
#ifdef NAS_VIRTUAL_EX
        printk("iSCSI LUN %d released\n", index);
        if (iscsi_iqn_arr[index]) {
            kfree(iscsi_iqn_arr[index]);
            iscsi_iqn_arr[index]=NULL;
        }
        if (iscsi_sn_vpd_arr[index]) {
            kfree(iscsi_sn_vpd_arr[index]);
            iscsi_sn_vpd_arr[index]=NULL;
        }
#endif
    }
#endif
//Patch by QNAP: USB Port Multiplier
    if(Is_USB_Front_Port_Index(index))  //sdia
        usb_front_port_dev_arr[index - USB_FRONT_PORT_START_INDEX] = 0;
    else if(Is_USB_Back_Port1_Index(index))//sdsa ~
        usb_back_port1_dev_arr[index - USB_BACK_PORT_1_START_INDEX] = 0;
    else if(Is_USB_Back_Port2_Index(index)) //sdta ~
        usb_back_port2_dev_arr[index - USB_BACK_PORT_2_START_INDEX] = 0;
    else if(Is_USB_Back_Port3_Index(index)) //sdua ~
        usb_back_port3_dev_arr[index - USB_BACK_PORT_3_START_INDEX] = 0;
    else if(Is_USB_Back_Port4_Index(index)) //sdva ~
        usb_back_port4_dev_arr[index - USB_BACK_PORT_4_START_INDEX] = 0;
    else if(Is_USB_Back_Port5_Index(index)) //sdqa ~
        usb_back_port5_dev_arr[index - USB_BACK_PORT_5_START_INDEX] = 0;
    else if(Is_USB_Back_Port6_Index(index)) //sdra ~
        usb_back_port6_dev_arr[index - USB_BACK_PORT_6_START_INDEX] = 0;
/////////////////////
    if(Is_ESATA_Bus1_Index(index)){ //sdya ~
        esata_bus1_dev_arr[index - ESATA_BUS1_START_INDEX] = 0;
    }
    else if(Is_ESATA_Bus2_Index(index)){ //sdza ~
        esata_bus2_dev_arr[index - ESATA_BUS2_START_INDEX] = 0;
    }
    else sd_dev_arr[index]=0;
#else
    ida_remove(&sd_index_ida, sdkp->index);
#endif
    /////////////////////////////////////////
    spin_unlock(&sd_index_lock);

    disk->private_data = NULL;
    put_disk(disk);
    put_device(&sdkp->device->sdev_gendev);

    kfree(sdkp);
}

static int sd_start_stop_device(struct scsi_disk *sdkp, int start)
{
    unsigned char cmd[6] = { START_STOP };  /* START_VALID */
    struct scsi_sense_hdr sshdr;
    struct scsi_device *sdp = sdkp->device;
    int res;

    if (start)
        cmd[4] |= 1;    /* START */

    if (sdp->start_stop_pwr_cond)
        cmd[4] |= start ? 1 << 4 : 3 << 4;  /* Active or Standby */

    if (!scsi_device_online(sdp))
        return -ENODEV;

    res = scsi_execute_req(sdp, cmd, DMA_NONE, NULL, 0, &sshdr,
                   SD_TIMEOUT, SD_MAX_RETRIES, NULL);
    if (res) {
        sd_printk(KERN_WARNING, sdkp, "START_STOP FAILED\n");
        sd_print_result(sdkp, res);
        if (driver_byte(res) & DRIVER_SENSE)
            sd_print_sense_hdr(sdkp, &sshdr);
    }

    return res;
}

/*
 * Send a SYNCHRONIZE CACHE instruction down to the device through
 * the normal SCSI command structure.  Wait for the command to
 * complete.
 */
static void sd_shutdown(struct device *dev)
{
    struct scsi_disk *sdkp = scsi_disk_get_from_dev(dev);
    if (!sdkp)
        return;         /* this can happen */
    if (sdkp->WCE) {
        sd_printk(KERN_NOTICE, sdkp, "Synchronizing SCSI cache\n");
        sd_sync_cache(sdkp);
    }

    if (system_state != SYSTEM_RESTART && sdkp->device->manage_start_stop) {
        sd_printk(KERN_NOTICE, sdkp, "Stopping disk\n");
        sd_start_stop_device(sdkp, 0);
    }

    scsi_disk_put(sdkp);
}

static int sd_suspend(struct device *dev, pm_message_t mesg)
{
    struct scsi_disk *sdkp = scsi_disk_get_from_dev(dev);
    int ret = 0;

    if (!sdkp)
        return 0;   /* this can happen */

    if (sdkp->WCE) {
        sd_printk(KERN_NOTICE, sdkp, "Synchronizing SCSI cache\n");
        ret = sd_sync_cache(sdkp);
        if (ret)
            goto done;
    }

    if ((mesg.event & PM_EVENT_SLEEP) && sdkp->device->manage_start_stop) {
        sd_printk(KERN_NOTICE, sdkp, "Stopping disk\n");
        ret = sd_start_stop_device(sdkp, 0);
    }

done:
    scsi_disk_put(sdkp);
    return ret;
}

static int sd_resume(struct device *dev)
{
    struct scsi_disk *sdkp = scsi_disk_get_from_dev(dev);
    int ret = 0;

    if (!sdkp->device->manage_start_stop)
        goto done;

    sd_printk(KERN_NOTICE, sdkp, "Starting disk\n");
    ret = sd_start_stop_device(sdkp, 1);

done:
    scsi_disk_put(sdkp);
    return ret;
}

/**
 *  init_sd - entry point for this driver (both when built in or when
 *  a module).
 *
 *  Note: this function registers this driver with the scsi mid-level.
 **/
static int __init init_sd(void)
{
    int majors = 0, i, err;

    SCSI_LOG_HLQUEUE(3, printk("init_sd: sd driver entry point\n"));

    for (i = 0; i < SD_MAJORS; i++)
        if (register_blkdev(sd_major(i), "sd") == 0)
            majors++;

    if (!majors)
        return -ENODEV;

    err = class_register(&sd_disk_class);
    if (err)
        goto err_out;

    err = scsi_register_driver(&sd_template.gendrv);
    if (err)
        goto err_out_class;

    sd_cdb_cache = kmem_cache_create("sd_ext_cdb", SD_EXT_CDB_SIZE,
                     0, 0, NULL);
    if (!sd_cdb_cache) {
        printk(KERN_ERR "sd: can't init extended cdb cache\n");
        goto err_out_class;
    }

    sd_cdb_pool = mempool_create_slab_pool(SD_MEMPOOL_SIZE, sd_cdb_cache);
    if (!sd_cdb_pool) {
        printk(KERN_ERR "sd: can't init extended cdb pool\n");
        goto err_out_cache;
    }

#ifdef NAS_VIRTUAL
#ifdef NAS_VIRTUAL_EX
    memset(iscsi_dev_arr, 0, sizeof(iscsi_dev_arr));
    memset(iscsi_iqn_arr, 0, sizeof(iscsi_iqn_arr));
    memset(iscsi_sn_vpd_arr, 0, sizeof(iscsi_sn_vpd_arr));
    memset(qnap_disk_node, 0, sizeof(qnap_disk_node));
    memset(qnap_iqn_node, 0, sizeof(qnap_iqn_node));
#endif
    create_qnap_disk_node_proc();
#endif
    return 0;

err_out_cache:
    kmem_cache_destroy(sd_cdb_cache);

err_out_class:
    class_unregister(&sd_disk_class);
err_out:
    for (i = 0; i < SD_MAJORS; i++)
        unregister_blkdev(sd_major(i), "sd");
    return err;
}

/**
 *  exit_sd - exit point for this driver (when it is a module).
 *
 *  Note: this function unregisters this driver from the scsi mid-level.
 **/
static void __exit exit_sd(void)
{
    int i;

    SCSI_LOG_HLQUEUE(3, printk("exit_sd: exiting sd driver\n"));

    mempool_destroy(sd_cdb_pool);
    kmem_cache_destroy(sd_cdb_cache);

    scsi_unregister_driver(&sd_template.gendrv);
    class_unregister(&sd_disk_class);

    for (i = 0; i < SD_MAJORS; i++)
        unregister_blkdev(sd_major(i), "sd");
}

module_init(init_sd);
module_exit(exit_sd);

static void sd_print_sense_hdr(struct scsi_disk *sdkp,
                   struct scsi_sense_hdr *sshdr)
{
    sd_printk(KERN_INFO, sdkp, "");
    scsi_show_sense_hdr(sshdr);
    sd_printk(KERN_INFO, sdkp, "");
    scsi_show_extd_sense(sshdr->asc, sshdr->ascq);
}

static void sd_print_result(struct scsi_disk *sdkp, int result)
{
    sd_printk(KERN_INFO, sdkp, "");
    scsi_show_result(result);
}