sys/dev/raid/iir/iir_ctrl.c

   1 /* $FreeBSD: src/sys/dev/iir/iir_ctrl.c,v 1.2.2.4 2002/05/05 08:18:12 asmodai Exp $ */
   2 /* $DragonFly: src/sys/dev/raid/iir/iir_ctrl.c,v 1.7 2004/05/19 22:52:47 dillon Exp $ */
   3 /*
   4  *       Copyright (c) 2000-01 Intel Corporation
   5  *       All Rights Reserved
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions, and the following disclaimer,
  12  *    without modification, immediately at the beginning of the file.
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice, this list of conditions and the following disclaimer in the
  15  *    documentation and/or other materials provided with the distribution.
  16  * 3. The name of the author may not be used to endorse or promote products
  17  *    derived from this software without specific prior written permission.
  18  *
  19  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  22  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
  23  * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  29  * SUCH DAMAGE.
  30  */
  31
  32 /*
  33  * iir_ctrl.c: Control functions and /dev entry points for /dev/iir*
  34  *
  35  * Written by: Achim Leubner <achim.leubner@intel.com>
  36  * Fixes/Additions: Boji Tony Kannanthanam <boji.t.kannanthanam@intel.com>
  37  *
  38  * TODO:
  39  */
  40
  41 #ident "$Id: iir_ctrl.c 1.2 2001/07/18 11:17:22 achim Exp $"
  42
  43 #include <sys/param.h>
  44 #include <sys/systm.h>
  45 #include <sys/malloc.h>
  46 #include <sys/kernel.h>
  47 #include <sys/uio.h>
  48 #include <sys/conf.h>
  49 #include <sys/stat.h>
  50 #include <sys/disklabel.h>
  51 #include <machine/bus.h>
  52 #include <vm/vm.h>
  53 #include <vm/vm_kern.h>
  54 #include <vm/vm_extern.h>
  55 #include <vm/pmap.h>
  56
  57 #include "iir.h"
  58
  59 /* Entry points and other prototypes */
  60 static struct gdt_softc *gdt_minor2softc(int minor_no);
  61
  62 static d_open_t         iir_open;
  63 static d_close_t        iir_close;
  64 static d_write_t        iir_write;
  65 static d_read_t         iir_read;
  66 static d_ioctl_t        iir_ioctl;
  67
  68 #define CDEV_MAJOR          IIR_CDEV_MAJOR
  69
  70 /* Normally, this is a static structure.  But we need it in pci/iir_pci.c */
  71 static struct cdevsw iir_cdevsw = {
  72         /* name */      "iir",
  73         /* maj */       CDEV_MAJOR,
  74         /* flags */     0,
  75         /* port */      NULL,
  76         /* clone */     NULL,
  77
  78         /* open */      iir_open,
  79         /* close */     iir_close,
  80         /* read */      iir_read,
  81         /* write */     iir_write,
  82         /* ioctl */     iir_ioctl,
  83         /* poll */      nopoll,
  84         /* mmap */      nommap,
  85         /* strategy */  nostrategy,
  86         /* dump */      nodump,
  87         /* psize */     nopsize
  88 };
  89
  90 static int iir_devsw_installed = 0;
  91 #ifndef SDEV_PER_HBA
  92 static int sdev_made = 0;
  93 #endif
  94 extern int gdt_cnt;
  95 extern char ostype[];
  96 extern char osrelease[];
  97 extern gdt_statist_t gdt_stat;
  98
  99 /*
 100  * Given a controller number,
 101  * make a special device and return the dev_t
 102  */
 103 dev_t
 104 gdt_make_dev(int unit)
 105 {
 106     dev_t dev;
 107
 108 #ifdef SDEV_PER_HBA
 109     dev = make_dev(&iir_cdevsw, hba2minor(unit), UID_ROOT, GID_OPERATOR,
 110                    S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH, "iir%d", unit);
 111 #else
 112     if (sdev_made)
 113         return (0);
 114     dev = make_dev(&iir_cdevsw, 0, UID_ROOT, GID_OPERATOR,
 115                    S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH, "iir");
 116     sdev_made = 1;
 117 #endif
 118     reference_dev(dev);
 119     return (dev);
 120 }
 121
 122 void
 123 gdt_destroy_dev(dev_t dev)
 124 {
 125     if (dev != NULL)
 126         destroy_dev(dev);
 127 }
 128
 129 /*
 130  * Given a minor device number,
 131  * return the pointer to its softc structure
 132  */
 133 static struct gdt_softc *
 134 gdt_minor2softc(int minor_no)
 135 {
 136     struct gdt_softc *gdt;
 137     int hanum;
 138
 139 #ifdef SDEV_PER_HBA
 140     hanum = minor2hba(minor_no);
 141 #else
 142     hanum = minor_no;
 143 #endif
 144
 145     for (gdt = TAILQ_FIRST(&gdt_softcs);
 146          gdt != NULL && gdt->sc_hanum != hanum;
 147          gdt = TAILQ_NEXT(gdt, links));
 148
 149     return (gdt);
 150 }
 151
 152 static int
 153 iir_open(dev_t dev, int flags, int fmt, d_thread_t * p)
 154 {
 155     GDT_DPRINTF(GDT_D_DEBUG, ("iir_open()\n"));
 156
 157 #ifdef SDEV_PER_HBA
 158     int minor_no;
 159     struct gdt_softc *gdt;
 160
 161     minor_no = minor(dev);
 162     gdt = gdt_minor2softc(minor_no);
 163     if (gdt == NULL)
 164         return (ENXIO);
 165 #endif
 166
 167     return (0);
 168 }
 169
 170 static int
 171 iir_close(dev_t dev, int flags, int fmt, d_thread_t * p)
 172 {
 173     GDT_DPRINTF(GDT_D_DEBUG, ("iir_close()\n"));
 174
 175 #ifdef SDEV_PER_HBA
 176     int minor_no;
 177     struct gdt_softc *gdt;
 178
 179     minor_no = minor(dev);
 180     gdt = gdt_minor2softc(minor_no);
 181     if (gdt == NULL)
 182         return (ENXIO);
 183 #endif
 184
 185     return (0);
 186 }
 187
 188 static int
 189 iir_write(dev_t dev, struct uio * uio, int ioflag)
 190 {
 191     GDT_DPRINTF(GDT_D_DEBUG, ("iir_write()\n"));
 192
 193 #ifdef SDEV_PER_HBA
 194     int minor_no;
 195     struct gdt_softc *gdt;
 196
 197     minor_no = minor(dev);
 198     gdt = gdt_minor2softc(minor_no);
 199     if (gdt == NULL)
 200         return (ENXIO);
 201 #endif
 202
 203     return (0);
 204 }
 205
 206 static int
 207 iir_read(dev_t dev, struct uio * uio, int ioflag)
 208 {
 209     GDT_DPRINTF(GDT_D_DEBUG, ("iir_read()\n"));
 210
 211 #ifdef SDEV_PER_HBA
 212     int minor_no;
 213     struct gdt_softc *gdt;
 214
 215     minor_no = minor(dev);
 216     gdt = gdt_minor2softc(minor_no);
 217     if (gdt == NULL)
 218         return (ENXIO);
 219 #endif
 220
 221     return (0);
 222 }
 223
 224 /**
 225  * This is the control syscall interface.
 226  * It should be binary compatible with UnixWare,
 227  * if not totally syntatically so.
 228  */
 229
 230 static int
 231 iir_ioctl(dev_t dev, u_long cmd, caddr_t cmdarg, int flags, d_thread_t * p)
 232 {
 233     GDT_DPRINTF(GDT_D_DEBUG, ("iir_ioctl() cmd 0x%lx\n",cmd));
 234
 235 #ifdef SDEV_PER_HBA
 236     int minor_no;
 237     struct gdt_softc *gdt;
 238
 239     minor_no = minor(dev);
 240     gdt = gdt_minor2softc(minor_no);
 241     if (gdt == NULL)
 242         return (ENXIO);
 243 #endif
 244     ++gdt_stat.io_count_act;
 245     if (gdt_stat.io_count_act > gdt_stat.io_count_max)
 246         gdt_stat.io_count_max = gdt_stat.io_count_act;
 247
 248     switch (cmd) {
 249       case GDT_IOCTL_GENERAL:
 250         {
 251             gdt_ucmd_t *ucmd;
 252             struct gdt_softc *gdt;
 253             int lock;
 254
 255             ucmd = (gdt_ucmd_t *)cmdarg;
 256             gdt = gdt_minor2softc(ucmd->io_node);
 257             if (gdt == NULL)
 258                 return (ENXIO);
 259             lock = splcam();
 260             TAILQ_INSERT_TAIL(&gdt->sc_ucmd_queue, ucmd, links);
 261             ucmd->complete_flag = FALSE;
 262             splx(lock);
 263             gdt_next(gdt);
 264             if (!ucmd->complete_flag)
 265                 (void) tsleep((void *)ucmd, PCATCH, "iirucw", 0);
 266             break;
 267         }
 268
 269       case GDT_IOCTL_DRVERS:
 270         *(int *)cmdarg =
 271             (IIR_DRIVER_VERSION << 8) | IIR_DRIVER_SUBVERSION;
 272         break;
 273
 274       case GDT_IOCTL_CTRTYPE:
 275         {
 276             gdt_ctrt_t *p;
 277             struct gdt_softc *gdt;
 278
 279             p = (gdt_ctrt_t *)cmdarg;
 280             gdt = gdt_minor2softc(p->io_node);
 281             if (gdt == NULL)
 282                 return (ENXIO);
 283             p->oem_id = 0x8000;
 284             p->type = 0xfd;
 285             p->info = (gdt->sc_bus << 8) | (gdt->sc_slot << 3);
 286             p->ext_type = 0x6000 | gdt->sc_subdevice;
 287             p->device_id = gdt->sc_device;
 288             p->sub_device_id = gdt->sc_subdevice;
 289             break;
 290         }
 291
 292       case GDT_IOCTL_OSVERS:
 293         {
 294             gdt_osv_t *p;
 295
 296             p = (gdt_osv_t *)cmdarg;
 297             p->oscode = 10;
 298             p->version = osrelease[0] - '0';
 299             if (osrelease[1] == '.')
 300                 p->subversion = osrelease[2] - '0';
 301             else
 302                 p->subversion = 0;
 303             if (osrelease[3] == '.')
 304                 p->revision = osrelease[4] - '0';
 305             else
 306                 p->revision = 0;
 307             strcpy(p->name, ostype);
 308             break;
 309         }
 310
 311       case GDT_IOCTL_CTRCNT:
 312         *(int *)cmdarg = gdt_cnt;
 313         break;
 314
 315       case GDT_IOCTL_EVENT:
 316         {
 317             gdt_event_t *p;
 318             int lock;
 319
 320             p = (gdt_event_t *)cmdarg;
 321             if (p->erase == 0xff) {
 322                 if (p->dvr.event_source == GDT_ES_TEST)
 323                     p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.test);
 324                 else if (p->dvr.event_source == GDT_ES_DRIVER)
 325                     p->dvr.event_data.size= sizeof(p->dvr.event_data.eu.driver);
 326                 else if (p->dvr.event_source == GDT_ES_SYNC)
 327                     p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.sync);
 328                 else
 329                     p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.async);
 330                 lock = splcam();
 331                 gdt_store_event(p->dvr.event_source, p->dvr.event_idx,
 332                                 &p->dvr.event_data);
 333                 splx(lock);
 334             } else if (p->erase == 0xfe) {
 335                 lock = splcam();
 336                 gdt_clear_events();
 337                 splx(lock);
 338             } else if (p->erase == 0) {
 339                 p->handle = gdt_read_event(p->handle, &p->dvr);
 340             } else {
 341                 gdt_readapp_event((u_int8_t)p->erase, &p->dvr);
 342             }
 343             break;
 344         }
 345
 346       case GDT_IOCTL_STATIST:
 347         {
 348             gdt_statist_t *p;
 349
 350             p = (gdt_statist_t *)cmdarg;
 351             bcopy(&gdt_stat, p, sizeof(gdt_statist_t));
 352             break;
 353         }
 354
 355       default:
 356         break;
 357     }
 358
 359     --gdt_stat.io_count_act;
 360     return (0);
 361 }
 362
 363 static void
 364 iir_drvinit(void *unused)
 365 {
 366     GDT_DPRINTF(GDT_D_DEBUG, ("iir_drvinit()\n"));
 367
 368     if (!iir_devsw_installed) {
 369         /* Add the I/O (data) channel */
 370         cdevsw_add(&iir_cdevsw, 0, 0);
 371         iir_devsw_installed = 1;
 372     }
 373 }
 374
 375 SYSINIT(iir_dev, SI_SUB_DRIVERS, SI_ORDER_MIDDLE + CDEV_MAJOR, iir_drvinit, NULL)