sys/dev/iir/iir_ctrl.c

   1 /*-
   2  *       Copyright (c) 2000-03 ICP vortex GmbH
   3  *       Copyright (c) 2002-03 Intel Corporation
   4  *       Copyright (c) 2003    Adaptec Inc.
   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@adaptec.com>
  36  * Fixes/Additions: Boji Tony Kannanthanam <boji.t.kannanthanam@intel.com>
  37  *
  38  * $Id: iir_ctrl.c 1.3 2003/08/26 12:31:15 achim Exp $"
  39  */
  40
  41 #include <sys/cdefs.h>
  42 __FBSDID("$FreeBSD$");
  43
  44 #include <sys/param.h>
  45 #include <sys/systm.h>
  46 #include <sys/endian.h>
  47 #include <sys/malloc.h>
  48 #include <sys/kernel.h>
  49 #include <sys/uio.h>
  50 #include <sys/conf.h>
  51 #include <sys/disk.h>
  52 #include <sys/stat.h>
  53 #include <sys/disklabel.h>
  54 #include <sys/sysctl.h>
  55 #include <machine/bus.h>
  56
  57 #include <dev/iir/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 /* Normally, this is a static structure.  But we need it in pci/iir_pci.c */
  69 static struct cdevsw iir_cdevsw = {
  70         .d_version =    D_VERSION,
  71         .d_flags =      D_NEEDGIANT,
  72         .d_open =       iir_open,
  73         .d_close =      iir_close,
  74         .d_read =       iir_read,
  75         .d_write =      iir_write,
  76         .d_ioctl =      iir_ioctl,
  77         .d_name =       "iir",
  78 };
  79
  80 /*
  81 static int iir_devsw_installed = 0;
  82 */
  83 #ifndef SDEV_PER_HBA
  84 static int sdev_made = 0;
  85 #endif
  86 extern int gdt_cnt;
  87 extern gdt_statist_t gdt_stat;
  88
  89 /*
  90  * Given a controller number,
  91  * make a special device and return the dev_t
  92  */
  93 struct cdev *
  94 gdt_make_dev(int unit)
  95 {
  96     struct cdev *dev;
  97
  98 #ifdef SDEV_PER_HBA
  99     dev = make_dev(&iir_cdevsw, hba2minor(unit), UID_ROOT, GID_OPERATOR,
 100                    S_IRUSR | S_IWUSR, "iir%d", unit);
 101 #else
 102     if (sdev_made)
 103         return (0);
 104     dev = make_dev(&iir_cdevsw, 0, UID_ROOT, GID_OPERATOR,
 105                    S_IRUSR | S_IWUSR, "iir");
 106     sdev_made = 1;
 107 #endif
 108     return (dev);
 109 }
 110
 111 void
 112 gdt_destroy_dev(struct cdev *dev)
 113 {
 114     if (dev != NULL)
 115         destroy_dev(dev);
 116 }
 117
 118 /*
 119  * Given a minor device number,
 120  * return the pointer to its softc structure
 121  */
 122 static struct gdt_softc *
 123 gdt_minor2softc(int minor_no)
 124 {
 125     struct gdt_softc *gdt;
 126     int hanum;
 127
 128 #ifdef SDEV_PER_HBA
 129     hanum = minor2hba(minor_no);
 130 #else
 131     hanum = minor_no;
 132 #endif
 133
 134     for (gdt = TAILQ_FIRST(&gdt_softcs);
 135          gdt != NULL && gdt->sc_hanum != hanum;
 136          gdt = TAILQ_NEXT(gdt, links));
 137
 138     return (gdt);
 139 }
 140
 141 static int
 142 iir_open(struct cdev *dev, int flags, int fmt, struct thread * p)
 143 {
 144     GDT_DPRINTF(GDT_D_DEBUG, ("iir_open()\n"));
 145
 146 #ifdef SDEV_PER_HBA
 147     int minor_no;
 148     struct gdt_softc *gdt;
 149
 150     minor_no = dev2unit(dev);
 151     gdt = gdt_minor2softc(minor_no);
 152     if (gdt == NULL)
 153         return (ENXIO);
 154 #endif
 155
 156     return (0);
 157 }
 158
 159 static int
 160 iir_close(struct cdev *dev, int flags, int fmt, struct thread * p)
 161 {
 162     GDT_DPRINTF(GDT_D_DEBUG, ("iir_close()\n"));
 163
 164 #ifdef SDEV_PER_HBA
 165     int minor_no;
 166     struct gdt_softc *gdt;
 167
 168     minor_no = dev2unit(dev);
 169     gdt = gdt_minor2softc(minor_no);
 170     if (gdt == NULL)
 171         return (ENXIO);
 172 #endif
 173
 174     return (0);
 175 }
 176
 177 static int
 178 iir_write(struct cdev *dev, struct uio * uio, int ioflag)
 179 {
 180     GDT_DPRINTF(GDT_D_DEBUG, ("iir_write()\n"));
 181
 182 #ifdef SDEV_PER_HBA
 183     int minor_no;
 184     struct gdt_softc *gdt;
 185
 186     minor_no = dev2unit(dev);
 187     gdt = gdt_minor2softc(minor_no);
 188     if (gdt == NULL)
 189         return (ENXIO);
 190 #endif
 191
 192     return (0);
 193 }
 194
 195 static int
 196 iir_read(struct cdev *dev, struct uio * uio, int ioflag)
 197 {
 198     GDT_DPRINTF(GDT_D_DEBUG, ("iir_read()\n"));
 199
 200 #ifdef SDEV_PER_HBA
 201     int minor_no;
 202     struct gdt_softc *gdt;
 203
 204     minor_no = dev2unit(dev);
 205     gdt = gdt_minor2softc(minor_no);
 206     if (gdt == NULL)
 207         return (ENXIO);
 208 #endif
 209
 210     return (0);
 211 }
 212
 213 /**
 214  * This is the control syscall interface.
 215  * It should be binary compatible with UnixWare,
 216  * if not totally syntatically so.
 217  */
 218
 219 static int
 220 iir_ioctl(struct cdev *dev, u_long cmd, caddr_t cmdarg, int flags, struct thread * p)
 221 {
 222     GDT_DPRINTF(GDT_D_DEBUG, ("iir_ioctl() cmd 0x%lx\n",cmd));
 223
 224 #ifdef SDEV_PER_HBA
 225     int minor_no;
 226     struct gdt_softc *gdt;
 227
 228     minor_no = dev2unit(dev);
 229     gdt = gdt_minor2softc(minor_no);
 230     if (gdt == NULL)
 231         return (ENXIO);
 232 #endif
 233     ++gdt_stat.io_count_act;
 234     if (gdt_stat.io_count_act > gdt_stat.io_count_max)
 235         gdt_stat.io_count_max = gdt_stat.io_count_act;
 236
 237     switch (cmd) {
 238       case GDT_IOCTL_GENERAL:
 239         {
 240             gdt_ucmd_t *ucmd;
 241             struct gdt_softc *gdt;
 242             int lock;
 243
 244             ucmd = (gdt_ucmd_t *)cmdarg;
 245             gdt = gdt_minor2softc(ucmd->io_node);
 246             if (gdt == NULL)
 247                 return (ENXIO);
 248             lock = splcam();
 249             TAILQ_INSERT_TAIL(&gdt->sc_ucmd_queue, ucmd, links);
 250             ucmd->complete_flag = FALSE;
 251             splx(lock);
 252             gdt_next(gdt);
 253             if (!ucmd->complete_flag)
 254                 (void) tsleep((void *)ucmd, PCATCH | PRIBIO, "iirucw", 0);
 255             break;
 256         }
 257
 258       case GDT_IOCTL_DRVERS:
 259       case GDT_IOCTL_DRVERS_OLD:
 260         *(int *)cmdarg =
 261             (IIR_DRIVER_VERSION << 8) | IIR_DRIVER_SUBVERSION;
 262         break;
 263
 264       case GDT_IOCTL_CTRTYPE:
 265       case GDT_IOCTL_CTRTYPE_OLD:
 266         {
 267             gdt_ctrt_t *p;
 268             struct gdt_softc *gdt;
 269
 270             p = (gdt_ctrt_t *)cmdarg;
 271             gdt = gdt_minor2softc(p->io_node);
 272             if (gdt == NULL)
 273                 return (ENXIO);
 274             /* only RP controllers */
 275             p->ext_type = 0x6000 | gdt->sc_device;
 276             if (gdt->sc_vendor == INTEL_VENDOR_ID_IIR) {
 277                 p->oem_id = OEM_ID_INTEL;
 278                 p->type = 0xfd;
 279                 /* new -> subdevice into ext_type */
 280                 if (gdt->sc_device >= 0x600)
 281                     p->ext_type = 0x6000 | gdt->sc_subdevice;
 282             } else {
 283                 p->oem_id = OEM_ID_ICP;
 284                 p->type = 0xfe;
 285                 /* new -> subdevice into ext_type */
 286                 if (gdt->sc_device >= 0x300)
 287                     p->ext_type = 0x6000 | gdt->sc_subdevice;
 288             }
 289             p->info = (gdt->sc_bus << 8) | (gdt->sc_slot << 3);
 290             p->device_id = gdt->sc_device;
 291             p->sub_device_id = gdt->sc_subdevice;
 292             break;
 293         }
 294
 295       case GDT_IOCTL_OSVERS:
 296         {
 297             gdt_osv_t *p;
 298
 299             p = (gdt_osv_t *)cmdarg;
 300             p->oscode = 10;
 301             p->version = osrelease[0] - '0';
 302             if (osrelease[1] == '.')
 303                 p->subversion = osrelease[2] - '0';
 304             else
 305                 p->subversion = 0;
 306             if (osrelease[3] == '.')
 307                 p->revision = osrelease[4] - '0';
 308             else
 309                 p->revision = 0;
 310             strcpy(p->name, ostype);
 311             break;
 312         }
 313
 314       case GDT_IOCTL_CTRCNT:
 315         *(int *)cmdarg = gdt_cnt;
 316         break;
 317
 318       case GDT_IOCTL_EVENT:
 319         {
 320             gdt_event_t *p;
 321             int lock;
 322
 323             p = (gdt_event_t *)cmdarg;
 324             if (p->erase == 0xff) {
 325                 if (p->dvr.event_source == GDT_ES_TEST)
 326                     p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.test);
 327                 else if (p->dvr.event_source == GDT_ES_DRIVER)
 328                     p->dvr.event_data.size= sizeof(p->dvr.event_data.eu.driver);
 329                 else if (p->dvr.event_source == GDT_ES_SYNC)
 330                     p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.sync);
 331                 else
 332                     p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.async);
 333                 lock = splcam();
 334                 gdt_store_event(p->dvr.event_source, p->dvr.event_idx,
 335                                 &p->dvr.event_data);
 336                 splx(lock);
 337             } else if (p->erase == 0xfe) {
 338                 lock = splcam();
 339                 gdt_clear_events();
 340                 splx(lock);
 341             } else if (p->erase == 0) {
 342                 p->handle = gdt_read_event(p->handle, &p->dvr);
 343             } else {
 344                 gdt_readapp_event((u_int8_t)p->erase, &p->dvr);
 345             }
 346             break;
 347         }
 348
 349       case GDT_IOCTL_STATIST:
 350         {
 351             gdt_statist_t *p;
 352
 353             p = (gdt_statist_t *)cmdarg;
 354             bcopy(&gdt_stat, p, sizeof(gdt_statist_t));
 355             break;
 356         }
 357
 358       default:
 359         break;
 360     }
 361
 362     --gdt_stat.io_count_act;
 363     return (0);
 364 }
 365
 366 /*
 367 static void
 368 iir_drvinit(void *unused)
 369 {
 370     GDT_DPRINTF(GDT_D_DEBUG, ("iir_drvinit()\n"));
 371
 372     if (!iir_devsw_installed) {
 373         cdevsw_add(&iir_cdevsw);
 374         iir_devsw_installed = 1;
 375     }
 376 }
 377
 378 SYSINIT(iir_dev, SI_SUB_DRIVERS, SI_ORDER_MIDDLE, iir_drvinit, NULL)
 379 */