sys/dev/raid/ips/ips_disk.c

   1 /*-
   2  * Written by: David Jeffery
   3  * Copyright (c) 2002 Adaptec Inc.
   4  * All rights reserved.
   5  *
   6  * Redistribution and use in source and binary forms, with or without
   7  * modification, are permitted provided that the following conditions
   8  * are met:
   9  * 1. Redistributions of source code must retain the above copyright
  10  *    notice, this list of conditions and the following disclaimer.
  11  * 2. Redistributions in binary form must reproduce the above copyright
  12  *    notice, this list of conditions and the following disclaimer in the
  13  *    documentation and/or other materials provided with the distribution.
  14  *
  15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  16  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  19  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  20  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  23  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  24  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  25  * SUCH DAMAGE.
  26  *
  27  * $FreeBSD: src/sys/dev/ips/ips_disk.c,v 1.4 2003/09/22 04:59:07 njl Exp $
  28  * $DragonFly: src/sys/dev/raid/ips/ips_disk.c,v 1.7 2006/02/17 19:18:05 dillon Exp $
  29  */
  30
  31 #include <sys/devicestat.h>
  32 #include <dev/raid/ips/ips.h>
  33 #include <dev/raid/ips/ips_disk.h>
  34 #include <sys/stat.h>
  35
  36 #include <vm/vm.h>
  37 #include <vm/pmap.h>
  38 #include <machine/md_var.h>
  39
  40 static int ipsd_probe(device_t dev);
  41 static int ipsd_attach(device_t dev);
  42 static int ipsd_detach(device_t dev);
  43
  44 static int ipsd_dump_helper(dev_t dev, u_int count, u_int blkno, u_int secsize);
  45 #if 0
  46 static int ipsd_dump(void *arg, void *virtual, vm_offset_t physical, off_t offset, size_t length);
  47 static void ipsd_dump_map_sg(void *arg, bus_dma_segment_t *segs, int nsegs,
  48                              int error);
  49 static void ipsd_dump_block_complete(ips_command_t *command);
  50 #endif
  51
  52 static disk_open_t ipsd_open;
  53 static disk_close_t ipsd_close;
  54 static disk_strategy_t ipsd_strategy;
  55
  56 static struct cdevsw ipsd_cdevsw = {
  57         .d_name         = "ipsd",
  58         .d_maj          = IPSD_CDEV_MAJOR,
  59         .d_flags        = D_DISK,
  60         .d_port         = NULL,
  61         .d_clone        = NULL,
  62         .old_open       = ipsd_open,
  63         .old_close      = ipsd_close,
  64         .old_strategy   = ipsd_strategy,
  65         .old_read       = physread,
  66         .old_write      = physwrite,
  67         .old_dump       = ipsd_dump_helper,
  68 };
  69
  70 static device_method_t ipsd_methods[] = {
  71         DEVMETHOD(device_probe,         ipsd_probe),
  72         DEVMETHOD(device_attach,        ipsd_attach),
  73         DEVMETHOD(device_detach,        ipsd_detach),
  74         { 0, 0 }
  75 };
  76
  77
  78 static driver_t ipsd_driver = {
  79         "ipsd",
  80         ipsd_methods,
  81         sizeof(ipsdisk_softc_t)
  82 };
  83
  84 static devclass_t ipsd_devclass;
  85 DRIVER_MODULE(ipsd, ips, ipsd_driver, ipsd_devclass, 0, 0);
  86
  87 /*
  88  * handle opening of disk device.  It must set up all information about
  89  * the geometry and size of the disk
  90  */
  91 static int
  92 ipsd_open(dev_t dev, int oflags, int devtype, d_thread_t *td)
  93 {
  94         ipsdisk_softc_t *dsc = dev->si_drv1;
  95
  96         if (dsc == NULL)
  97                 return (ENXIO);
  98         dsc->state |= IPS_DEV_OPEN;
  99         DEVICE_PRINTF(2, dsc->dev, "I'm open\n");
 100         return 0;
 101 }
 102
 103 static int
 104 ipsd_close(dev_t dev, int oflags, int devtype, d_thread_t *td)
 105 {
 106         ipsdisk_softc_t *dsc = dev->si_drv1;
 107
 108         dsc->state &= ~IPS_DEV_OPEN;
 109         DEVICE_PRINTF(2, dsc->dev, "I'm closed for the day\n");
 110         return 0;
 111 }
 112
 113 /* ipsd_finish is called to clean up and return a completed IO request */
 114 void
 115 ipsd_finish(struct bio *bio)
 116 {
 117         struct buf *bp = bio->bio_buf;
 118         ipsdisk_softc_t *dsc;
 119
 120         dsc = bio->bio_driver_info;
 121         if (bp->b_flags & B_ERROR) {
 122                 device_printf(dsc->dev, "iobuf error %d\n", bp->b_error);
 123         } else {
 124                 bp->b_resid = 0;
 125         }
 126         devstat_end_transaction_buf(&dsc->stats, bp);
 127         biodone(bio);
 128         ips_start_io_request(dsc->sc);
 129 }
 130
 131
 132 static void
 133 ipsd_strategy(dev_t dev, struct bio *bio)
 134 {
 135         ipsdisk_softc_t *dsc;
 136
 137         dsc = dev->si_drv1;
 138         DEVICE_PRINTF(8, dsc->dev, "in strategy\n");
 139         bio->bio_driver_info = dsc;
 140         devstat_start_transaction(&dsc->stats);
 141         lwkt_exlock(&dsc->sc->queue_lock, __func__);
 142         bioq_insert_tail(&dsc->sc->bio_queue, bio);
 143         ips_start_io_request(dsc->sc);
 144         lwkt_exunlock(&dsc->sc->queue_lock);
 145 }
 146
 147 static int
 148 ipsd_probe(device_t dev)
 149 {
 150         DEVICE_PRINTF(2, dev, "in probe\n");
 151         device_set_desc(dev, "Logical Drive");
 152         return 0;
 153 }
 154
 155 static int
 156 ipsd_attach(device_t dev)
 157 {
 158         device_t adapter;
 159         ipsdisk_softc_t *dsc;
 160         struct  disklabel *label;
 161         u_int totalsectors;
 162         u_int nheads, nsectors;
 163
 164         DEVICE_PRINTF(2, dev, "in attach\n");
 165         dsc = (ipsdisk_softc_t *)device_get_softc(dev);
 166         bzero(dsc, sizeof(ipsdisk_softc_t));
 167         adapter = device_get_parent(dev);
 168         dsc->dev = dev;
 169         dsc->sc = device_get_softc(adapter);
 170         dsc->unit = device_get_unit(dev);
 171         dsc->disk_number = (uintptr_t) device_get_ivars(dev);
 172         totalsectors = dsc->sc->drives[dsc->disk_number].sector_count;
 173         if ((totalsectors > 0x400000) &&
 174             ((dsc->sc->adapter_info.miscflags & 0x8) == 0)) {
 175                 nheads = IPS_NORM_HEADS;
 176                 nsectors = IPS_NORM_SECTORS;
 177         } else {
 178                 nheads = IPS_COMP_HEADS;
 179                 nsectors = IPS_COMP_SECTORS;
 180         }
 181         devstat_add_entry(&dsc->stats, "ipsd", dsc->unit, DEV_BSIZE,
 182                           DEVSTAT_NO_ORDERED_TAGS,
 183                           DEVSTAT_TYPE_DIRECT | DEVSTAT_TYPE_IF_SCSI,
 184                           DEVSTAT_PRIORITY_DISK);
 185         dsc->ipsd_dev_t = disk_create(dsc->unit, &dsc->ipsd_disk, 0,
 186             &ipsd_cdevsw);
 187         dsc->ipsd_dev_t->si_drv1 = dsc;
 188         dsc->ipsd_dev_t->si_iosize_max = IPS_MAX_IO_SIZE;
 189         label = &dsc->ipsd_disk.d_label;
 190         bzero(label, sizeof(*label));
 191         label->d_ntracks    = nheads;
 192         label->d_nsectors   = nsectors;
 193         label->d_type       = DTYPE_ESDI;
 194         label->d_secsize    = IPS_BLKSIZE;
 195         label->d_ncylinders = totalsectors / nheads / nsectors;
 196         label->d_secpercyl  = nsectors / nheads;
 197         label->d_secperunit = totalsectors;
 198         device_printf(dev, "Logical Drive  (%dMB)\n",
 199             dsc->sc->drives[dsc->disk_number].sector_count >> 11);
 200         return 0;
 201 }
 202
 203 static int
 204 ipsd_detach(device_t dev)
 205 {
 206         ipsdisk_softc_t *dsc;
 207
 208         DEVICE_PRINTF(2, dev, "in detach\n");
 209         dsc = (ipsdisk_softc_t *)device_get_softc(dev);
 210         if (dsc->state & IPS_DEV_OPEN)
 211                 return (EBUSY);
 212         devstat_remove_entry(&dsc->stats);
 213         disk_destroy(&dsc->ipsd_disk);
 214         return 0;
 215 }
 216
 217 static int
 218 ipsd_dump_helper(dev_t dev, u_int count, u_int blkno, u_int secsize)
 219 {
 220         printf("dump support for IPS not yet working, will not dump\n");
 221         return (ENODEV);
 222
 223 #if 0
 224         long blkcnt;
 225         caddr_t va;
 226         vm_offset_t addr, a;
 227         int dumppages = MAXDUMPPGS;
 228         int i;
 229
 230         addr = 0;
 231         blkcnt = howmany(PAGE_SIZE, secsize);
 232         while (count > 0) {
 233                 va = NULL;
 234                 if (count / blkcnt < dumppages)
 235                         dumppages = count / blkcnt;
 236                 for (i = 0; i < dumppages; i++) {
 237                         a = addr + (i * PAGE_SIZE);
 238                         if (!is_physical_memory(a))
 239                                 a = 0;
 240                         va = pmap_kenter_temporary(trunc_page(a), i);
 241                 }
 242
 243                 ipsd_dump(dev, va, 0, blkno, PAGE_SIZE * dumppages);
 244                 if (dumpstatus(addr, (off_t)count * DEV_BSIZE) < 0)
 245                         return (EINTR);
 246                 blkno += blkcnt * dumppages;
 247                 count -= blkcnt * dumppages;
 248                 addr += PAGE_SIZE * dumppages;
 249         }
 250         return (0);
 251 #endif
 252 }
 253
 254 #if 0
 255
 256 static int
 257 ipsd_dump(void *arg, void *virtual, vm_offset_t physical, off_t offset,
 258           size_t length)
 259 {
 260         dev_t dev = arg;
 261         ips_softc_t *sc;
 262         ips_command_t *command;
 263         ips_io_cmd *command_struct;
 264         ipsdisk_softc_t *dsc;
 265         off_t off;
 266         uint8_t *va;
 267         int len;
 268         int error = 0;
 269
 270         dsc = dev->si_drv1;
 271         if (dsc == NULL)
 272                 return (EINVAL);
 273         sc = dsc->sc;
 274
 275         if (ips_get_free_cmd(sc, &command, 0) != 0) {
 276                 printf("ipsd: failed to get cmd for dump\n");
 277                 return (ENOMEM);
 278         }
 279
 280         command->data_dmatag = sc->sg_dmatag;
 281         command->callback = ipsd_dump_block_complete;
 282
 283         command_struct = (ips_io_cmd *)command->command_buffer;
 284         command_struct->id = command->id;
 285         command_struct->drivenum = sc->drives[dsc->disk_number].drivenum;
 286
 287         off = offset;
 288         va = virtual;
 289
 290         while (length > 0) {
 291                 len = length > IPS_MAX_IO_SIZE ? IPS_MAX_IO_SIZE : length;
 292                 command_struct->lba = off / IPS_BLKSIZE;
 293                 if (bus_dmamap_load(command->data_dmatag, command->data_dmamap,
 294                     va, len, ipsd_dump_map_sg, command, 0) != 0) {
 295                         error = EIO;
 296                         break;
 297                 }
 298                 if (COMMAND_ERROR(&command->status)) {
 299                         error = EIO;
 300                         break;
 301                 }
 302
 303                 length -= len;
 304                 off += len;
 305                 va += len;
 306         }
 307         ips_insert_free_cmd(command->sc, command);
 308         return(error);
 309 }
 310
 311 static void
 312 ipsd_dump_map_sg(void *arg, bus_dma_segment_t *segs, int nsegs, int error)
 313 {
 314         ips_softc_t *sc;
 315         ips_command_t *command;
 316         ips_sg_element_t *sg_list;
 317         ips_io_cmd *command_struct;
 318         int i, length;
 319
 320         command = (ips_command_t *)arg;
 321         sc = command->sc;
 322         length = 0;
 323
 324         if (error) {
 325                 printf("ipsd_dump_map_sg: error %d\n", error);
 326                 command->status.value = IPS_ERROR_STATUS;
 327                 return;
 328         }
 329
 330         command_struct = (ips_io_cmd *)command->command_buffer;
 331
 332         if (nsegs != 1) {
 333                 command_struct->segnum = nsegs;
 334                 sg_list = (ips_sg_element_t *)((uint8_t *)
 335                     command->command_buffer + IPS_COMMAND_LEN);
 336                 for (i = 0; i < nsegs; i++) {
 337                         sg_list[i].addr = segs[i].ds_addr;
 338                         sg_list[i].len = segs[i].ds_len;
 339                         length += segs[i].ds_len;
 340                 }
 341                 command_struct->buffaddr =
 342                     (uint32_t)command->command_phys_addr + IPS_COMMAND_LEN;
 343                 command_struct->command = IPS_SG_WRITE_CMD;
 344         } else {
 345                 command_struct->buffaddr = segs[0].ds_addr;
 346                 length = segs[0].ds_len;
 347                 command_struct->segnum = 0;
 348                 command_struct->command = IPS_WRITE_CMD;
 349         }
 350
 351         length = (length + IPS_BLKSIZE - 1) / IPS_BLKSIZE;
 352         command_struct->length = length;
 353         bus_dmamap_sync(sc->command_dmatag, command->command_dmamap,
 354             BUS_DMASYNC_PREWRITE);
 355         bus_dmamap_sync(command->data_dmatag, command->data_dmamap,
 356             BUS_DMASYNC_PREWRITE);
 357
 358         sc->ips_issue_cmd(command);
 359         sc->ips_poll_cmd(command);
 360         return;
 361 }
 362
 363 static void
 364 ipsd_dump_block_complete(ips_command_t *command)
 365 {
 366         if (COMMAND_ERROR(&command->status)) {
 367                 printf("ipsd_dump completion error= 0x%x\n",
 368                        command->status.value);
 369         }
 370         bus_dmamap_sync(command->data_dmatag, command->data_dmamap,
 371             BUS_DMASYNC_POSTWRITE);
 372         bus_dmamap_unload(command->data_dmatag, command->data_dmamap);
 373 }
 374
 375 #endif