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.10 2006/07/28 02:17:37 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/device.h>
  51 #include <sys/disklabel.h>
  52 #include <sys/thread2.h>
  53 #include <machine/bus.h>
  54 #include <vm/vm.h>
  55 #include <vm/vm_kern.h>
  56 #include <vm/vm_extern.h>
  57 #include <vm/pmap.h>
  58
  59 #include "iir.h"
  60
  61 /* Entry points and other prototypes */
  62 static struct gdt_softc *gdt_minor2softc(int minor_no);
  63
  64 static d_open_t         iir_open;
  65 static d_close_t        iir_close;
  66 static d_write_t        iir_write;
  67 static d_read_t         iir_read;
  68 static d_ioctl_t        iir_ioctl;
  69
  70 #define CDEV_MAJOR          IIR_CDEV_MAJOR
  71
  72 /* Normally, this is a static structure.  But we need it in pci/iir_pci.c */
  73 static struct dev_ops iir_ops = {
  74         { "iir", CDEV_MAJOR, 0 },
  75         .d_open =       iir_open,
  76         .d_close =      iir_close,
  77         .d_read =       iir_read,
  78         .d_write =      iir_write,
  79         .d_ioctl =      iir_ioctl,
  80 };
  81
  82 static int iir_devsw_installed = 0;
  83 #ifndef SDEV_PER_HBA
  84 static int sdev_made = 0;
  85 #endif
  86 extern int gdt_cnt;
  87 extern char ostype[];
  88 extern char osrelease[];
  89 extern gdt_statist_t gdt_stat;
  90
  91 /*
  92  * Given a controller number,
  93  * make a special device and return the dev_t
  94  */
  95 dev_t
  96 gdt_make_dev(int unit)
  97 {
  98     dev_t dev;
  99
 100 #ifdef SDEV_PER_HBA
 101     dev = make_dev(&iir_ops, hba2minor(unit), UID_ROOT, GID_OPERATOR,
 102                    S_IRUSR | S_IWUSR, "iir%d", unit);
 103 #else
 104     if (sdev_made)
 105         return (0);
 106     dev = make_dev(&iir_ops, 0, UID_ROOT, GID_OPERATOR,
 107                    S_IRUSR | S_IWUSR, "iir");
 108     sdev_made = 1;
 109 #endif
 110     reference_dev(dev);
 111     return (dev);
 112 }
 113
 114 void
 115 gdt_destroy_dev(dev_t dev)
 116 {
 117     if (dev != NULL)
 118         destroy_dev(dev);
 119 }
 120
 121 /*
 122  * Given a minor device number,
 123  * return the pointer to its softc structure
 124  */
 125 static struct gdt_softc *
 126 gdt_minor2softc(int minor_no)
 127 {
 128     struct gdt_softc *gdt;
 129     int hanum;
 130
 131 #ifdef SDEV_PER_HBA
 132     hanum = minor2hba(minor_no);
 133 #else
 134     hanum = minor_no;
 135 #endif
 136
 137     for (gdt = TAILQ_FIRST(&gdt_softcs);
 138          gdt != NULL && gdt->sc_hanum != hanum;
 139          gdt = TAILQ_NEXT(gdt, links));
 140
 141     return (gdt);
 142 }
 143
 144 static int
 145 iir_open(struct dev_open_args *ap)
 146 {
 147     GDT_DPRINTF(GDT_D_DEBUG, ("iir_open()\n"));
 148
 149 #ifdef SDEV_PER_HBA
 150     int minor_no;
 151     struct gdt_softc *gdt;
 152
 153     minor_no = minor(dev);
 154     gdt = gdt_minor2softc(minor_no);
 155     if (gdt == NULL)
 156         return (ENXIO);
 157 #endif
 158
 159     return (0);
 160 }
 161
 162 static int
 163 iir_close(struct dev_close_args *ap)
 164 {
 165     GDT_DPRINTF(GDT_D_DEBUG, ("iir_close()\n"));
 166
 167 #ifdef SDEV_PER_HBA
 168     int minor_no;
 169     struct gdt_softc *gdt;
 170
 171     minor_no = minor(dev);
 172     gdt = gdt_minor2softc(minor_no);
 173     if (gdt == NULL)
 174         return (ENXIO);
 175 #endif
 176
 177     return (0);
 178 }
 179
 180 static int
 181 iir_write(struct dev_write_args *ap)
 182 {
 183     GDT_DPRINTF(GDT_D_DEBUG, ("iir_write()\n"));
 184
 185 #ifdef SDEV_PER_HBA
 186     int minor_no;
 187     struct gdt_softc *gdt;
 188
 189     minor_no = minor(dev);
 190     gdt = gdt_minor2softc(minor_no);
 191     if (gdt == NULL)
 192         return (ENXIO);
 193 #endif
 194
 195     return (0);
 196 }
 197
 198 static int
 199 iir_read(struct dev_read_args *ap)
 200 {
 201     GDT_DPRINTF(GDT_D_DEBUG, ("iir_read()\n"));
 202
 203 #ifdef SDEV_PER_HBA
 204     int minor_no;
 205     struct gdt_softc *gdt;
 206
 207     minor_no = minor(dev);
 208     gdt = gdt_minor2softc(minor_no);
 209     if (gdt == NULL)
 210         return (ENXIO);
 211 #endif
 212
 213     return (0);
 214 }
 215
 216 /**
 217  * This is the control syscall interface.
 218  * It should be binary compatible with UnixWare,
 219  * if not totally syntatically so.
 220  */
 221
 222 static int
 223 iir_ioctl(struct dev_ioctl_args *ap)
 224 {
 225     GDT_DPRINTF(GDT_D_DEBUG, ("iir_ioctl() cmd 0x%lx\n",cmd));
 226
 227 #ifdef SDEV_PER_HBA
 228     int minor_no;
 229     struct gdt_softc *gdt;
 230
 231     minor_no = minor(dev);
 232     gdt = gdt_minor2softc(minor_no);
 233     if (gdt == NULL)
 234         return (ENXIO);
 235 #endif
 236     ++gdt_stat.io_count_act;
 237     if (gdt_stat.io_count_act > gdt_stat.io_count_max)
 238         gdt_stat.io_count_max = gdt_stat.io_count_act;
 239
 240     switch (ap->a_cmd) {
 241       case GDT_IOCTL_GENERAL:
 242         {
 243             gdt_ucmd_t *ucmd;
 244             struct gdt_softc *gdt;
 245
 246             ucmd = (gdt_ucmd_t *)ap->a_data;
 247             gdt = gdt_minor2softc(ucmd->io_node);
 248             if (gdt == NULL)
 249                 return (ENXIO);
 250             crit_enter();
 251             TAILQ_INSERT_TAIL(&gdt->sc_ucmd_queue, ucmd, links);
 252             ucmd->complete_flag = FALSE;
 253             crit_exit();
 254             gdt_next(gdt);
 255             if (!ucmd->complete_flag)
 256                 (void) tsleep((void *)ucmd, PCATCH, "iirucw", 0);
 257             break;
 258         }
 259
 260       case GDT_IOCTL_DRVERS:
 261         *(int *)ap->a_data =
 262             (IIR_DRIVER_VERSION << 8) | IIR_DRIVER_SUBVERSION;
 263         break;
 264
 265       case GDT_IOCTL_CTRTYPE:
 266         {
 267             gdt_ctrt_t *p;
 268             struct gdt_softc *gdt;
 269
 270             p = (gdt_ctrt_t *)ap->a_data;
 271             gdt = gdt_minor2softc(p->io_node);
 272             if (gdt == NULL)
 273                 return (ENXIO);
 274             p->oem_id = 0x8000;
 275             p->type = 0xfd;
 276             p->info = (gdt->sc_bus << 8) | (gdt->sc_slot << 3);
 277             p->ext_type = 0x6000 | gdt->sc_subdevice;
 278             p->device_id = gdt->sc_device;
 279             p->sub_device_id = gdt->sc_subdevice;
 280             break;
 281         }
 282
 283       case GDT_IOCTL_OSVERS:
 284         {
 285             gdt_osv_t *p;
 286
 287             p = (gdt_osv_t *)ap->a_data;
 288             p->oscode = 10;
 289             p->version = osrelease[0] - '0';
 290             if (osrelease[1] == '.')
 291                 p->subversion = osrelease[2] - '0';
 292             else
 293                 p->subversion = 0;
 294             if (osrelease[3] == '.')
 295                 p->revision = osrelease[4] - '0';
 296             else
 297                 p->revision = 0;
 298             strcpy(p->name, ostype);
 299             break;
 300         }
 301
 302       case GDT_IOCTL_CTRCNT:
 303         *(int *)ap->a_data = gdt_cnt;
 304         break;
 305
 306       case GDT_IOCTL_EVENT:
 307         {
 308             gdt_event_t *p;
 309
 310             p = (gdt_event_t *)ap->a_data;
 311             if (p->erase == 0xff) {
 312                 if (p->dvr.event_source == GDT_ES_TEST)
 313                     p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.test);
 314                 else if (p->dvr.event_source == GDT_ES_DRIVER)
 315                     p->dvr.event_data.size= sizeof(p->dvr.event_data.eu.driver);
 316                 else if (p->dvr.event_source == GDT_ES_SYNC)
 317                     p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.sync);
 318                 else
 319                     p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.async);
 320                 crit_enter();
 321                 gdt_store_event(p->dvr.event_source, p->dvr.event_idx,
 322                                 &p->dvr.event_data);
 323                 crit_exit();
 324             } else if (p->erase == 0xfe) {
 325                 crit_enter();
 326                 gdt_clear_events();
 327                 crit_exit();
 328             } else if (p->erase == 0) {
 329                 p->handle = gdt_read_event(p->handle, &p->dvr);
 330             } else {
 331                 gdt_readapp_event((u_int8_t)p->erase, &p->dvr);
 332             }
 333             break;
 334         }
 335
 336       case GDT_IOCTL_STATIST:
 337         {
 338             gdt_statist_t *p;
 339
 340             p = (gdt_statist_t *)ap->a_data;
 341             bcopy(&gdt_stat, p, sizeof(gdt_statist_t));
 342             break;
 343         }
 344
 345       default:
 346         break;
 347     }
 348
 349     --gdt_stat.io_count_act;
 350     return (0);
 351 }
 352
 353 static void
 354 iir_drvinit(void *unused)
 355 {
 356     GDT_DPRINTF(GDT_D_DEBUG, ("iir_drvinit()\n"));
 357
 358     if (!iir_devsw_installed) {
 359         /* Add the I/O (data) channel */
 360         dev_ops_add(&iir_ops, 0, 0);
 361         iir_devsw_installed = 1;
 362     }
 363 }
 364
 365 SYSINIT(iir_dev, SI_SUB_DRIVERS, SI_ORDER_MIDDLE + CDEV_MAJOR, iir_drvinit, NULL)